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

Program z2;
Var a,b,s: real;
Begin
Writeln (‘Введи катеты’);
Readln (a,b);
s:=1/2*a*b;
Writeln (‘s=’,s);
Readln;
End.