По 2 катитам триугольника вычеслите его периметр и площадь (информатика 9класс)
Var a,b,s,p:real; begin writeln('Введите катеты'); readln(a,b); s:=a*b*0.5; p:=a+b+sqrt(sqr(a)+sqr(b)); writeln('Площадь= ',s,' Периметр= ',p); end.