Constn=60;var a,l,i,j:integer;mas: array [1..n] of integer;begin randomize;writeln('Исходный массив '); for i:=1 to n do begin mas[i]:=random(64); write(mas[i]:4); end; for i:=1 to n-1 do for j:=1 to n-i do if mas[j] < mas[j+1] then begin a:=mas[j]; mas[j]:=mas[j+1]; mas[j+1]:=a; end; writeln(); writeln('Массив по убыванию'); for i:=1 to n do write(mas[i]:4); end.
Это чтоли 27+36=62 Или подругому!
<span>8x битов=32 кбайт
Переведем 32 Кбайта в биты=32*1024(это в байты)*8(это в биты)=</span><span><span>262144бит
</span></span>х=<span><span>262144/8
х=</span></span><span><span>32768
или упростим х бит=4кбайт
х=4*1024*8=32768</span></span>