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

Question

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

Экономика

Гость

Ответ(ы) на вопрос:

Гость

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.

Accepted Answer

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;