Информатики плиз помогите.Решите задачу через паскаль

Question

Информатики плиз помогите.Решите задачу через паскаль

---

Answer 1

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

begin
  Writeln(ReadSeqInteger(ReadlnInteger).Where(t->t mod 4=0).Max)
end.

Пример
10
-8 6 12 0 -8 19 -5 2 12 -40
12

---

Comments

А var где

---

Разве не надо писать var