Напишите программу вычисления периметра и площади прямоугольного треугольника по заданным длинам двух катетов a и b. На языке Паскаль
Var a,b,c,s,p:real; begin Write('Введите a и b:'); Read(a,b); c:=sqrt(a*a+b*b); p:=a+b+c; s:=(a/2)*b; Writeln('Периметр: ',p); Write('Площадь: ',s); End.
спс все работает оценка 5+
Var a,b: integer; begin writeln('Введите а'); readln(a); writeln('Введите b'); readln(b); writeln('Площадь',' ' , a*b); writeln('Периметр',' ' , (a+b)*2); end.
ой не то
а как
??????????
выпей гной
смотри не подавись украине прива