Программа. вычислить площадь и периметр прямоугольного треугольника по трем его сторонам. информатика

Program n1;
var a,b,c : real;
begin
readln(a,b,c);
write('S=',0.5*a*b,'; P=',a+b+c);
end.