Пожалуйста!!!Запиши программу в Pascal для вычисления площади прямоугольника со сторонами a и m​

program p1;

uses srt;

var a,m,sum:integer;

begin

clrscr;

writeln("read p and a");

read(m);

read(a);

sum:=m*a;

write(sum);

readkey;

end;