Составить программу блок схемы и на паскаль нахождения площади прямоугольника, если извесны его стороны
Var a,b,S :real; begin S:=0; read(a,b); S:=a*b; write(S); end.