Составить блок-схему и программу вычисления площадь прямоугольника
Program z1; var s,a,b:real; begin writeln('введите стороны прямоугольника'); readln(a,b); s:=a*b; writeln(s); end.