Составить программу вычисления периметра прямоугольного треугольника если известно что 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.
Не нашли ответ?
Похожие вопросы