Перепишите программу на языке Паскаль, исправив ошибки:

Program primer
Var a,b:integer;
Begin;
RealLn(a,b);
s=a+b;
m:=a*b;
d:=a:b;
WriteLn(s);
WriteLn(m);
WriteLn(d)
End

Program primer;
var a,b,s,m,d: integer;
Begin 
     ReadLn(a,b);
     s:=a+b;
     m:=a*b;
     d:=a div b;
      WriteLn(s);
      WriteLn(m);
      WriteLn(d);
End.

Пример:
48 15
63
720
3