Составьте программку для вычисления катетов прямоугольного треугольника площадью S, у которого

Составьте программку для вычисления катетов прямоугольного треугольника площадью S, у которого длина 1-го катета в два раза меньше длины иного

Задать свой вопрос
1 ответ
Pascal

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 var a,b,c,s:real; begin repeat write ('Введите длину гипотенузы c='); readln(c); write ('Введите длину катета a='); readln(a); write ('Введите длину площади s='); readln(s); if (cgt;b) and (cgt;0) and (bgt;0) then begin a:=sqrt(sqr(c)-sqr(b)); s:=(1/2)*b*c; write end.

Алла Гавешина
Спасибо
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт