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

var a,h,s:real;

begin

readln(a);

readln(h);

s:=0.5*a*h;

write('s=',s:0:2);

end.