Ввести с клавиатуры значение площади прямоугольного треугольника.( треугольник

Ввести с клавиатуры значение площади прямоугольного треугольника.( треугольник равнобедренный). Вывести на экран значение катетов, гипотенузы. Использовать процедуру для получения результатов "Выходные переменные"

Задать свой вопрос
1 ответ
Program Project2;
 APPTYPE CONSOLE
var s,a,c:Real;
begin 
 Readln(s); 
 s:=s*2; 
 a:=Sqrt(s); 
 c:=Sqr(a)+sqr(a); 
 writeln('katetu',a:0,' gipotenusa',c:0); 
 readln;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт