• Предмет: Информатика
  • Автор: Melania2002
  • Вопрос задан 11 месяцев назад

СРОЧНОООООООО, помогите
Напишите программу, которая в последовательности целых чисел определяет количество чисел, оканчивающихся на 5. Программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0( 0 - признак окончания ввода, не входит в последовательность). Программа должна вывести одно число: количество чисел, оканчивающихся на 5.

Ответы

Ответ дал: Аноним
0
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t<>0).Where(t->Abs(t mod 10)=5).Count.Println
end.

Пример
234 115 210 -55 28 15 0
3
Вас заинтересует