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

program del;

begin
  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;

end.

Leave a Comment

− 3 = 2