Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Помогите пожалуйста решить по паскалиABC Гипотенуза прямоугольного треугольника равна с, а один из катетов а. Найти площадь этого треугольника

Ответ оставил Гость

Var a,b,c,S:real;
begin
writeln(введите гипотенузу треугольника );
readln(a);
writeln(введите катет треугольника )
readln(b);
c:=sqrt(sqr(a)-sqr(b));
S:=(c*b)/2;
writeln(площадь треугольника S=,S);
end.