Склавиатуры вводятся 10 двузначных чисел. напечатать те из них, которые делятся нацело на 4, но не делятся на 6. подсчитать их количество.

const

  n = 10; //количество чисел, которое нужно ввестиvar  a: array [1..n] of 10..99; {массив двузначных чисел, которые вводятся с клавиатуры}  number, i: integer; //number - количество чисел

begin  number: = 0; //обнуляем счетчик  for i: = 1 to n do //вводим n двузначных чисел  begin    writeln('введите двузначное число');     readln(a[i]);   end;   write('числа, которые делятся на 4,но не делятся на 6: ');   for i: = 1 to n do   {распечатываем числа, которые делятся на 4, но не делятся на 6}    if (a[i] mod 4 = 0) and (a[i] mod 6 < > 0) then {если число делится на 4 и не делится на 6, прибавляем к счетчику 1}  begin    write(a[i], ' ');     number: = number + 1;   end;   writeln;   writeln('количество чисел, которые делятся на 4, но не делятся на 6: ', number); end.

Скорее всего жэто программа Python

Объяснение: