1 байт ровно 8 бит 1 килобайт 1024 килобайт 1 мегабайт 1024килобайт 1 гигобайт 1024 мегабайт 1 тера байт 1024 гигобайт 1 ретро байт 1024 тера байт 1 этабайт1024петабайт...
<span>// PascalABC.NET 3.3, сборка 1562 от 02.11.2017
</span>
var
a:array[1..1000000] of integer;
i, n, x, y, cnt : integer;
begin
writeln('Введите кол-во элементов массива');
readln(n);
writeln('Введите ', n, ' чисел');
for i:= 1 to n do read(a[i]);
Writeln('Введите промежуток от X до Y');
readln(x, y);
for i:= x to y do
if (a[i] < 0) then cnt:= cnt + 1;
Write('Отрицательных элементов: ', cnt);
end.
Всего 9 камней в соотношении 4:3:2, для одного камня требуется 4 бита (2^4=16) следовательно 4:3:2/4 = 1,5
8x(бит)=32(Мбайт)
8x(бит)=32*1024*1024*8
8x(бит)=268435456 (бит)
x(бит)=268435456 / 8
x(бит)=33554432