Как исправить, чтобы работало?

begin

 for var x := 0 to 1 do

   for var y := 0 to 1 do

     for var w := 0 to 1 do

       for var z := 0 to 1 do

         writeln(w, '', x, '', y, '', z);

end.

Объяснение:

Указание переменных для циклов в заголовочном var является устаревшим методом.

64 * 64 = 4096

512 * 8 = 4096 бит

4096 : 4096 = 1 бит

n = 2^i

n = 2^1 = 2 цвета

ответ. 2 цвета.

решение на