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

Приложения:

Ответы

Ответ дал: iolandavalerypad353
0

begin

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

end.

Вас заинтересует