• Ввести с клавиатуры два числа. Проверить, равно ли второе число нулю. Если да, то вывести на экран фразу: «На ноль делить нельзя!» Если нет, то найти их частное.

Ответы 1

  • var  a, b : Integer;begin    Write('Введите a: ');    Readln(a);    Write('Введите b: ');    Readln(b);    if b = 0 then Writeln('На ноль делить нельзя!') else Writeln(a div b);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years