Составить программу на паскаль: найти гипотенузу если известно 2 катета

6451254Ника 6451254Ника    1   22.07.2019 18:50    2

Ответы
ladalis22 ladalis22  23.09.2020 18:10
Program N_1;
Var a,b: real;
Begin  
write('Введите числа a,b: ');
readln(a,b);
writeln('Гипотенуза равна = ',sqr(a)+sqr(b):0:2);
readln;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика