СРОЧНОООООООО, помогите Напишите программу, которая в последовательности целых чисел...

0 голосов

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


спросил от (17 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от БОГ (150k баллов)
 
Лучший ответ
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
...