как исправить ошибку???

как исправить ошибку "попытка присвоить переменной типа integer выражение типа real"

program ddt;
var a,b,s,m,d :integer;
begin
readln(a,b);
s:=a+b;
m:=a*b;
d:=a/b; вот тут ошибка
writeln(s);
writeln(m);
writeln(d);
end.

напишите как это должно выгладить без ошибки, а то мне не понятно, заранее благодарен!!!