Как написать грограмму вычисления площади прямоугольного триугольника если даны два катита A и B (S=A*B/2). ???

//Язык Pascal

Program Test;

Var A, B, S: real;

Begin

Write('Введите первый катет: ');
Readln(A);
Writeln();
Write('Введите второй катет: ');
Readln(B);
Writeln();

S := A * B / 2;

Writeln('S = ', S);

End.