Создайте программу на языке паскаль, которая отвечает критериям текста​

var

 n, a, i, count: integer;

begin

 count := 0;

 readln(n);

 for i := 1 to n do

   begin

     readln(a);

     if a mod 4 = 0 then

         count := count + 1

   end;

 writeln(count);

end.

ответ:Binary coding — 0010101101010010010101110100101

00101101101100010000101000100110

00101100001001101010100100101011

101010000

Informatica — 0011001001010111010011110101100

00101101101010110010010100101110

1010100100100110001001010

Kazakhstan — 0011010001001010011000110100101

00101010001010001010111000101110

10100101001010111

Rykhani jangyry — 0011101101100010010101000101000

10100101001010111010100100001010

00101001101001010010101110101000

00110001001011011011000100000111

00001110000101100010010110101101

10000111000011011001011110000111

00001110000101110

Объяснение:

Денежные знаки - это пример смешанной системы счисления. Сейчас в России используются монеты и купюры следующих номиналов: 1 коп., 5 коп., 10 коп., 50 коп., 1 руб., 2 руб., 5 руб., 10 руб., 50 руб., 100 руб., 500 руб., 1000 руб. и 5000 руб. Чтобы получить некоторую сумму в рублях, нам нужно использовать некоторое количество денежных знаков различного достоинства. Предположим, что мы покупаем пылесос, который стоит 6379 руб. Чтобы расплатиться, нам потребуется шесть купюр по тысяче рублей, три купюры по сто рублей, одна пятидесятирублёвая купюра, две десятки, одна пятирублёвая монета и две монеты по два рубля. Если мы запишем количество купюр или монет начиная с 1000 руб. и заканчивая одной копейкой, заменяя нулями пропущенные номиналы, то мы получим число, представленное в смешанной системе счисления; в нашем случае — 603121200000. 

В непозиционной системе счисления величина числа не зависит от положения цифры в представлении числа. Если бы мы перемешали цифры в числе 603121200000, то мы бы не смогли понять, сколько стоит пылесос; в непозиционной системе случится нечто похожее. Ярким примером непозиционной системы счисления является римская система.