Соберите алгоритм загрузки компьютера (сверху вниз).

64 * 64 = 4096

512 * 8 = 4096 бит

4096 : 4096 = 1 бит

n = 2^i

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

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

256 цветов - это 1байт на пиксел

один экран = 640*480*1байт = 300 кб

значит только один эран и вместится

оператор function - начало описания функции

оператор procedure - начало описания процедуры

оператор type - описание пользовательского типа

операторы and or not - коньюнкция, дизьюнкция и отрицание

операторы сравнения < > < > =

это добавка к предыдущему посту

random верный и не надо со мной спорить! там четко написано максимальное значение 45, минимальное значение 0-15=- 

на счет второго замечания, я то согласен, но разницы и тем более ошибки из-за которой стоит поднимать панику  

если человек. кторый пишет здесь такое простое задние не в состоянии самостоятельно его решить это значит одно, что если его решение будет сложным, значит это не он сам

program w; var a: array [1..20] of integer; i,j: integer;

begin

j: =0; for i: =1 to 20 do begina[i]: =random(60)-15; if a[i] mod 2 =0 then inc(j); end;

write(j); end.