<span><span><span><span>
Вроде бы такое решение </span></span></span></span>
Var
n,i:Integer;
begin
for i:=-5 to 5 do
WriteLn(3*i+2);
end.
1024*512=524288 всего
1.5=12582912 бит
Делишь это 24бита пиксель
N=16777216 цветов
Управляющий объект- Полиционер
Объект управления- машины
Цель управления- Не должна произойти авария
Управляющее воздействие- графическое сообщение
При значениях x1 1 функция принимает истинное значение всегда, в остальных случаях только 0.
Ответ 000,100,101,110,111