снеговик .
начало
скатать большёй шар
потом два поменьше
потом поставить на большёй 2 поменьше
потом воткнуть нос-морковку
скатать 2 малюсеньких шара и прикрепить к туловищу
вставить метлу
одеть вдро на голову
одеть шарф
сделать глаза и рот -угольки
конец
256 = 2⁸, поэтому пикселей 2⁸×2⁸ = 2¹⁶ пикселей
3 Кбайта = 3×2¹⁰ байт = 3×2¹⁰×2³ бит = 3×2¹³ бит.
На 1 пиксель приходится 3×2¹³/2¹⁶ бит = 3/2³ =3/8 бита.
Это и есть размер палитры. Но под пиксель нельзя отвести меньше бита, поэтому задача НЕКОРРЕКТНА.
Var sum,i:integer;
begin
sum:=0;
for i:=100 to 999 do
if (i mod 3=0) then sum:=sum+i;
writeln('Сумма трехзначных чисел кратных трем равна ',sum);
<span>end.</span>
begin
ReadSeqIntegerWhile(p -> Abs(p).InRange(10,99)).Average.Println
end.