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

//Язык PascalProgram Test;Var A, B, S: real;BeginWrite('Введите первый катет: ');Readln(A);Writeln();Write('Введите второй катет: ');Readln(B);Writeln();S := A * B / 2;Writeln('S = ', S);End.