ПРОГРАММИРОВАНИЕ ПАСКАЛЬ. С клавиатуры вводится высота и основание треугольника. Найти площадь. h=3 a=4
Var H,a:integer; s:real; begin Read(h); read(a); s:=1/2*h*a; writeln(s:8:4); End.