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

Напишите программу на языке програмирования паскаль в которой нужно найти гипотенузу прямоугольного треугольника если известны катеты.

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

program abc;
uses crt;
var a,b,c:real;
begin
writeln(Vvedite 1 katet);
readln(a);
writeln(Vvedite 2 katet);
readln(b);
c:=sqrt((a*a)+(b*b));
writeln(Gipotenuza=,c);
end.