написать программу которая определяет: если целое число M делится на целое число N, то на экране выводит часть деления, в противном случае выводится сообщение "M и N нацело не делиться" в pascal

var    m, n : Integer;begin    Write('M = ');      Readln(m);        Write('N = ');      Readln(n);         if M mod N = 0 then          Writeln(M div N)       else             Writeln('M и N нацело не делится.');        Readln;end.

var n,m:integer;beginreadln(m,n);if m mod n =0 then writeln(m div n) else writeln('Ne delitsea');end.