Истинный цвет - каждый пиксель весит 24 бита
Объем = кол-во пикселей* глубину цвета=20*20*24 бит=9600 бит=1200 байт=приблизит. 1,17Кбайт
Если это паскаль, то вывод на экран можно выполнить так:
writeln('x = ',x);
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
SeqGen(ReadInteger('n='),i->1/(2*i),1).Println.Sum.Println
end.
<u>Пример</u>
n= 6
0.5 0.25 0.166666666666667 0.125 0.1 0.0833333333333333
1.225