Переменные A и B
Всё остальное - это просто сообщения, так что за переменные их не считаем
1ая задача :
1) 16*16= 256 пикселей всего
2) 256/64=4 байта на один пиксель в изображении
4байта = 32бита
3)N(кол-во цветов в палитре) = 2^32(бита на пиксель) максимальное возможное число цветов в палитре
Program Ok;
var a,i,k,n:integer;
begin
k:=0;
write('Введите кол-во чисел: ');
readln( n);
for i:=1 to n do
begin
read(a);
if (a div 10 <> 0) and (a div 100 = 0) and (a mod 2 = 0) and (a mod 3 = 0) then
k:=k+1;
end;
write(k);
end.