var a,b:integer; p,s:real;
begin
writeln ('Vvedite dlinny katetov');
readln (a,b);
p:=(sqrt(sqr(a)+sqr(b)))+a+b;
s:=0.5*a*b;
writeln ('Perimetr = ',p:3:3);
writeln ('Ploshad = ',s:3:3);
readln
end. Периметр это сумма всех сторон треугольника, то есть двух катетов и гипотенузы. Два катета у нас есть, а гипотенуза это корень квадратный из суммы квадратов двух катетов.
Площадь в прямоугольном треуголнике равна произведению двух катетов разделенное на два или умноженное на 0.5
