Предмет: Информатика, автор: kuiju

. Задана площадь прямоугольного треугольника и один из его катетов. Составьте программу, с помощью которой определите гипотенузу и периметр этого треугольника.

Ответы

Автор ответа: egos
0

program p1;
uses crt;
var S, a, b, c:real;
begin
write('Введите площадь треугольника: '); readln(S);
write('Введите один из катетов: '); readln(a);
b:=S/(1/2*a);
c:=sqrt(a*a+b*b);
writeln('Второй катет = ', b);
writeln('Гипотенуза = ', c);
end.

Похожие вопросы
Предмет: Информатика, автор: sssssaaaaddinnnnnaa
Предмет: Математика, автор: ekaterinagudkova002
Предмет: Алгебра, автор: Аноним