• выяснить, являются ли числа 2, 3 и 5 делителями некоторого заданного числа А. (pascal abc)

Ответы 1

  • vara:integer;beginreadln(a);if a mod 2 = 0 then writeln('2 делитель числа ',a)elsewriteln('2 не делитель числа ',a);if a mod 3 = 0 then writeln('3 делитель числа ',a)elsewriteln('3 не делитель числа ',a);if a mod 5 = 0 then writeln('5 делитель числа ',a)elsewrite('5 не делитель числа ',a);end.
    • Автор:

      gustavo
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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