Напишите программу в Паскаль.15б

Question

Напишите программу в Паскаль.15б

---

Answer 1

Begin
  write(ReadSeqInteger(ReadInteger()).Where(x -> x mod 3 = 0).Sum);
end.

Comments

Вы не могли бы скину программу Полностью и не в строчку