Сколько кодовых комбинаций дает 8-й двоичный код

var n, n1, n2, n3, k: integer;

begin readln(n); n1 : = 1; n2 : = 1; n3 : = 2; k : = 0; if (n=1) or (n=2) then k : = 1; while n3 < = n do begin if n3=n then k : = 1; n1 : = n2; n2 : = n3; n3 : = n1 + n2; end; if k = 1 then writeln(n, ' является числом фибоначчи') else writeln(n, ' не является числом фибоначчи'); end.

логика, морзе, вектор, шина, дек, рунет, железо, терно, юзер, каретка, адаптер, браузер, цифра, образ, плата, эталон, сектор(стокер), зерно, утилита, файл, гамма, щелчок, чистка, иконка, ядро, ершов, хаб, набор 

640х250х4 = 640000 бит, что соответствует примерно 80 кбайтам. последняя 4 берется из необходимого количества битов для кодирования 16 цветов.

сделать сначала 10х10 а потом растягиванием

а вообще легче всего будет написать код в vba (вставлять через макрос)

for i = 1 to 1000

  for j =1 to 1000

      cells(i,j)=i*j

  next j

next i