Программа, вычисляющая частное от деления двух чисел

Написать программу, вычисляющую частное от деления двух чисел. Программа должна проверить правильность введенных пользователем данных и, если они неверные (делитель равен нулю), вызвать сообщение об ошибке.

Writeln('Vvedite m');
Readln(m);
Writeln('Vvedite n');
Readln(n);
If n=0 then Writeln('Vvedeni nevernie chisla') 
   else begin
      k:=(m mod n);
      Writeln('OTVET: ',k);
   end;

автор: Cyn4uk