программе на вход подается число n -- количество чисел, и соответственно n натуральных чисел. Вывести на экран количество чисел, которые делятся на 4, но не делятся на 8.

Pascal:

program pas;

var n,a,i,b:integer;

begin

writeln('N = ');

readln(n);

for i:=1 to n do begin

   readln(a);

   if (a mod 4 = 0) and (a mod 8 <> 0) then b+=1

end;

write('Количество чисел ',b)

end.

Python:

n = int(input("N = "))

b=0

for i in range(n):

   a = int(input())

   if (a%4==0) and (a%8!=0):

       b+=1

print("Количество чисел "+str(b))