Вводиться n чисел. сколько из них заканчивается ** 3? PascalABC

Question

Вводиться n чисел. сколько из них заканчивается на 3? PascalABC

Comments

Ну, я и говорила про PascalABC.NET. Про старые версии и слова не было

Answer 1

// 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