Помогите написать на языке Pascal S=1/2ah
Var a, h: real; begin readln(a, h); writeln('S=', 0.5 * a * h); end.
Program plochad; var a, h: real; begin readln(a, h); S:=0.5*a*h; write('S=', S); end.