Вычислите периметр и площадь прямоугольного треугольника если стороны треугольника вводятся с клавиатуры (a, b, c; a,d-катеты)
Вычислите периметр и площадь прямоугольного треугольника если стороны треугольника вводятся с клавиатуры (a, b, c; a,d-катеты)
Гость
Ответ(ы) на вопрос:
ГостьProgram z1;var a,b,c,d,P,S:real;
begin
writeln ('Введите стороны треугольника');
readln (a,b,c);
P:=a+b+c;
writeln ('Периметр треугольника=',P);
writeln ('Введите катеты');
readln (a,d);
S:=((a*b)/2);
writeln ('Площадь прямоугольного треугольника=',S);
end.
Не нашли ответ?
Похожие вопросы