Опишіть послідовність дій під час створення архіву кількох файлів

uses crt; var  i,s: integer; begin  i: =2; s: =1;   while i< =10 do  begin    s: =s*i;     i: =i+2;   end;   write(s); end.

на пиксель приходится 512*8/32²=4 бита.  2^4=16 цветов.