Какое количество информации может обработать за одну операцию 16 разрядный процессор?

Сильно вопрос если не учитывать но видимо 2 байта за такт

Program asd; const n=4;       m=3; var a: array[1..n,1..m] of integer; b,jd,id: array[1..n] of integer; i,j,k,min,ii,jj: integer; begin    for i: =1 to n do      begin    for j: =1 to m do        begin      a[i,j]: =2+random(8);       write(a[i,j],' ');         end;     writeln;   end;           writeln;   ii: =1;       for i: =1 to n do    begin      min: =1000;       for j: =1 to m do        begin      jj: =1;         if a[i,j]< =min then     begin      min: =a[i,j];     id[i]: =i;     jd[i]: =j;         end;         end;       b[i]: =min;               end;     for i: =1 to n do      begin    writeln('min: ',b[i],'. строка: ',id[i],'; столбец: ',jd[i],'; ');       end;     end.

Program project2; {$apptype console} uses  sysutils;     const n=30;         m=1; var b,c: array[m..n] of integer; i,a,s,y,s1: integer; begin write('vvedite trexsnachnoe chislo a: ');   readln(a);   y: =a;   s: =0;   while ( y< > 0 ) do    begin    s: =s + (y mod 10);     y: =y div 10;   end; writeln('summa zifr ravna: ',s); writeln; writeln('massiv: '); for i: =m to n do     begin  b[i]: =100+random(200);   write(b[i],' ');   c[i]: =b[i];   end; writeln;   writeln;     write('vse chisla, kotorye ravny po summe zifr: ') ;   for i: =m to n do      begin    s1: =0;   while ( b[i]< > 0 ) do    begin    s1: =s1 + (b[i] mod 10);     b[i]: =b[i] div 10;   end;     //write(' ',s1,' ');     if s=s1 then    begin    write(c[i],' ');     end;   end;         readln;   end.