• Паскаль.Вводится ряд чисел, неизвестное кол-во, но конец ряда всегда ноль; найти количество чисел кратных пяти и больше пяти (одновременно)

Ответы 1

  • // PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  ReadSeqIntegerWhile(t->t<>0).Where(t->(t>5) and (t mod 5=0)).Count.Printlnend.Пример13 -10 8 5 24 35 52 40 20 18 03
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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