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

Помогите решить задачу в Паскале. Известна гипотенуза и один из катетов прямоугольного треугольника. Найдите второй катет

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

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