Вводиться n чисел. сколько из них заканчивается на - вопрос №83154113 от kola3344 08.02.2023 21:15

Question

Информатика: Вводиться n чисел. сколько из них заканчивается на 3? pascalabc

kola3344 · Answer

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln(ReadSeqInteger(ReadInteger).Where(t->Abs(t) mod 10=3).Count)
end.

Пример
8
-13 23 6 3 130 0 123 2
4