После каждого изменения переменной вставить команду вывода его значения
1) 11221
2) Сместиться на (-2, -1)
3) Сместиться на (-12, 0)
4) (13, -4)
5) 2
<span>106
function f(x: integer): integer;
var
L, M: integer;
begin
L := x - 12;
M := x + 12;
while L <> M do
if L > M then
L := L - M
else
M := M - L;
f := L;
end;
begin
var x := 100;
var r := 0;
repeat
x := x + 1;
r := f(x);
until r = 2;
writeln(x);
end.
</span>
1024*256=262144 (пикселей) всего в изображении
160 Кб *1024 = 163840 байт *8 = 1310720 бит
1310720 / 262144 = 5 (бит) приходится на один пиксель
Формула мощности алфавита: N = 2^i
N = 2^5 = 32 - максимальное количество цветов
Ответ: 32