Var a:array[1..12] of integer;
i:integer;
begin
for i:=1 to 12 do
read(a[i]);
for i:=12 downto 1 do
write(a[i],'; ');
end.
Первый и последний вариант не подходят, так как требуют 9 двоичных разрядов. Подойдет только второе число 101010(2)
var
i,a,b:integer;
begin
randomize;
readln(a,b);
for i:=1 to 5 do
write(random(b-a+1)+a,' ');
end.
Кол-во пикселей = 64 * 64 = 4096
512 байт = 4096 бит
Размер одного пикселя = 4096/4096 = 1 бит
Максимально возможное кол-во цветов =
= 2