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

87711077664ZE 87711077664ZE    3   12.09.2019 10:20    0

Ответы
ladysachenko20 ladysachenko20  07.10.2020 09:26
// 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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика