Нужно составить блок-схему(! обязательно! ) и составить программу. : "даны длины сторон двух прямоугольников а,в,с,d - соответственны).вывисти на экран площадь большего прямоугольника".

Program p1;
var a,b,c,d : integer;
begin
writeln('vvedite a,b,c,d');
readln(a,b,c,d);
if (a*b)>(c*d) then writeln(a*b) else (c*d);
end.