Составить программу вычисления периметра прямоугольного треугольника если известно что 2 катета а=5,в=3

Составить программу вычисления периметра прямоугольного треугольника если известно что 2 катета а=5,в=3
Гость
Ответ(ы) на вопрос:
Гость
program mcfdncfio; uses crt; var a,b,c,p:integer; begin a:=5; b:=3; c:=sqrt(sqr(a)+sqr(b)); p:=a+b+c; writeln(p); readln; end. Если не работает, то для c отдельно напиши  c:real;  
Гость
program pr1; var a,b,c,p:integer; begin a:=5; b:=3; c:=sqrt(sqr(a)+sqr(b)); p:=a+b+c; writeln ( ' периметр треугольника равен ' ); writeln(p); end.  
Не нашли ответ?
Ответить на вопрос
Похожие вопросы