. Вычисли количество адресуемых ячеек памяти, если разрядность шины адреса равна 24: N= С пояснением

Uses crt;
const n=10;
var a,b,c: array [1..n] of integer;
    x,y,z,k: integer;
begin
     y:=0;
     z:=0;
     for x:=1 to n do begin
         a[x]:=random(100)+1;
         if a[x] mod 2=0 then begin
            inc(y);
            b[y]:=a[x];
            end
            else begin
                 inc(z);
                 c[z]:=a[x];
            end;
         write(a[x]:4);
     end;
     writeln;
     k:=y;
     for y:=1 to k do
         write(b[y]:4);
     writeln;
     k:=z;
     for z:=1 to k do
         write(c[z]:4);
end.