Помогите решить вот это
Блок-схема - в прилагаемом файле. Program P; var a,b,s:real; begin write('a='); readln(a); write('b='); readln(b); s:=a*b/2; writeln('s=',s); end. Пример: a=3 b=4 s=6