Нельзя преобразовать тип real к integer program primer; var a,b,s,m,d: integer; begin; readln (a,b,s,m,d); s: =a+b; m: =a*b; d: =(a/b); writeln(s); writeln(m); writeln(d); end.

Тебе дает ошибку потому что результат деления - имеет тип REAL.
d:=(a/b);

поэтому определи переменную

var d:real;