Ошибка "ожидалось имя переменной", как исправить? - PascalABC.NET

var
  x:=real;//делимое
  y:=real;//делитель
  a:=real;//частное
  b:=real;//остаток
 
begin;
  write ('введите делимое' );
  readln (x);
  write ('введите делитель' );
  readln (y);
  clrscr;
  var a:=x div y;
  var b:=x mod y;
  writeln (x,':',y,'=',a,'(остаток ',b,')');
  writeln ('нажмите клавишу Enter чтобы закрыть окно');
  readln;
end.