Почему появилась байтовая память?

var

i: integer;

s: real;

m: array[1..2,1..6] of real;

begin

s: =0;

for i: =1 to 6 do

begin

readln(m[1,i]);

readln(m[2,i]);

s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;

end;

writeln(s);

end.

1-я строка имеет длину 1

2-я - 3

3-я - 7

4-я - 15

5-я - 31

6-я - 63

7-я - 127

8-я - 255

9-я - 511 = 8я+8я+i

причем символы с 1 по 255 это первая 8-я строка символы с 256 по 511 это 2-я 8-я строка и символ i

8-я строка это две 7-х строки и символ h

каждая строка в начале имеет предыдущие строки таким образом в начале 8-й строки стоит символ a и далее так как в 4-й строке написано

program e8;

var a, b, c, v: real;

begin

writeln('введите значения длины, ширины,высоты');

readln(a,b,c);

v: =a*b*c;

writeln('v=', v: 4: 2);

readln;

end.

uses graph;                                           {подключен модуль graph}var x,y,h: integer; procedure grinit;       {процедура инициализации режима графики}var      graphdriver: integer;                   {для графического адаптера}      graphmode  : integer;                   {для графического режима}      errorcode  : integer;                   {для кода ошибки}begin      graphdriver : =detect;                   {режим автоопределения}      initgraph(graphdriver ,graphmode,''); {инициализация}      errorcode : =graphresult;             {результат инициализации}      if errorcode < >   grok then        {если не успешно,}      begin            writeln('ошибка графики: ',grapherrormsg(errorcode ));             writeln('программа остановлена.');             halt(1)      end {if}end; begin      grinit;                                                           {вызов инициализации}      x: =getmaxx div 2;       y: =getmaxy div 2;       h: = 30; {кол-во шагов до финиша}      while x+y> 0 do      begin        cleardevice;             circle(x, y, 10);             delay(100);             x: = x + getmaxx div h;             y: = y - getmaxy div h;       end;       readln;                                                 {пауза до нажатия }      closegraph;                                 {закрытие графического режима}end.