8192 байт = 8192*8 бит
Память для одного пикселя = 8192*8/(32*128) = 16 бит
Количество цветов = 2^16 = 65536
K, M, G и T - это названия размерностей информации: Килобайт, Мегабайт, Гигабайт и Терабайт соответственно. Переменная A служит для временного "принятия" количества байт, которые переведутся в K, M, G и T.
Как бы проще объяснить, откуда 1024 - не знаю. В информатике так устроено, что в бит - это 1 элемент, байт - 8 битов, килобайт - 1024 байт и с этого момента последующая размерность будет иметь 1024 информации предыдущей размерности, то есть мегабайт - 1024 килобайт, гигабайт - 1024 мегабайт и так далее. Вообще - это стоит просто запомнить.
Program <любое название на английском>
uses crt;
var n:integer;
begin
read(n);
for n:=1 to 20 do writeln(n, '$= ', 65*n, 'рублей');
end.
Вроде так.
Вот, модель, заменитель и моделирование
Забей в поисковике: Мутный взгляд 1: cлучай в Саратове