Составьте программу для вычисления гипотенузы, периметра и площади прямоугольного треугольника, если известны его катеты.
Составьте программу для вычисления гипотенузы, периметра и площади прямоугольного треугольника, если известны его катеты.
Гость
Ответ(ы) на вопрос:
Гостьprogram z1;
var s,p,a,b,c:real;
begin
write('Введите катеты: ');
read(a,b);
c:=sqrt(sqr(a)+sqr(b)); // гипотенуза по т.Пифагора
writeln('Гипотенуза = ',c);
p:=a+b+c;// периметр
writeln('Периметр = ',p);
s:=a*b; // площадь
writeln('Площадь = ',s);
end.
Жду спасибо)
Не нашли ответ?
Похожие вопросы