Объяснение:
var a,b:real; c,e:integer;
begin
writeln('Введите два целых числа');
readln(a);
// нет ввода второго целого числа. надо написать readln(b);
c:=a/b; //ошибка! при делении может получится дробное число, а с указано как целое
d:=a mod b; //переменная d не описана в разделе var
e:=c+d;
writeln(c);
writeln(d);
writeln(e);
end.
Готовая программа:
var c, e:real; a,b,d:integer;
begin
writeln('Введите два целых числа');
readln(a);
readln(b);
c:=a/b;
d:=a mod b;
e:=c+d;
writeln(c);
writeln(d);
writeln(e);
end.
