Найдите ошибку в программе

program 1;
var a, b, c: integer;
begin
writeln('Введите два целых числа');
read ( a, b );
c := a / b;
writeln ( a,_/_, b, _=_, c )
end