Question

Напишите программу пожалуйста

Answer 1

begin

 ReadSeqInteger(ReadInteger()).Where(x->x mod 4 = 0).Count.Println;

end.