По-моему так. Смотрите картинку. .
ВОТ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
Var n : Integer;
Begin
Readln(n);
n:=(n mod 10)*1000+(n mod 1000 div 10)*10+(n div 1000);
Writeln(n);
end.
Ввод: 1234
Вывод: 4231
Объём памяти вычислится по формуле:
log2(число цветов) = log2(65536) = 16 бит
В 1 байте 8 битов, следовательно:
16 бит = 2 байта
Ответ: 2 байта