<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
for var i:=0 to a.IndexMin-1 do a[i]:=0; a.Println;
end.
<u>Пример</u>
n= 13
-10 44 17 13 50 49 -7 -46 -36 14 35 42 26
0 0 0 0 0 0 0 -46 -36 14 35 42 26
Ответ будет "a" , Пожалуйста
Палитра состоящая из 32 цветов - это 2 в 5 степени т.е 5 бит на 1px
6. Проверка:
javascript:x=2,y=3;x-=y;if(x<0)x=y*2;else x*=2;alert(x);