Составьте программу вычисления площади треугольника с основанием a и высотой h. Значения a и h введите с клавиатуры.

program z6;var s,a,h:real;begin writeln('Введите a,h'); readln(a,h); s:=(a*h)/2; writeln(s:4:2);end.