<em>// PascalABC.NET 3.3, сборка 1599 от 17.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(ReadSeqInteger(ReadlnInteger).Where(t->t mod 4=0).Max)
end.
<u>Пример</u>
10
-8 6 12 0 -8 19 -5 2 12 -40
12
Для перевода целого десятичного числа в двоичную систему счисления нужно последовательно выполнять деление данного числа и получаемых целых частных на 2 до тех пор, пока не получим частное, равное нулю
Сургут, например, хотя я не нашла точной логической цепочки