Составьте программу нахождения гипотенузы прямоугольного треугольника если известны его катеты

Question

Информатика

Любимыйсын

27 сентября, 01:20

Составьте программу нахождения гипотенузы прямоугольного треугольника если известны его катеты

+2

Ответы (1)

Знаешь ответ?

Акиндин · Answer 1

Var

a, b, c, z:real;

begin

writeln ('Введите катет А ');

readln (a);

writeln ('Введите катет B ');

readln (b);

z:=sqr (a) + sqr (b);

c:=sqrt (z);

writeln ('Гипотенуза равна ', c);

end.