Напишите программу, которая в последовательности - вопрос №8869520 от asssssw 11.09.2021 02:05

Question

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

asssssw · Answer

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