2^40бит=2^40/2^33ГБайт=2^7Гбайт=128Гбайт
<span>Один символ при алфавитном подходе будет нести 5 бит информации (2 в Х степени = 32) . Общий объём информации 39x5 = 195 бит</span>
var
m: Real;
i: Integer;
begin
m := 1.5;
for i := 1 to 7 do begin
WriteLn (i, ' сентября количество биомассы составляет ', m:10:7, ' т' );
m := m * 1.3;
end;
end.
Program otvet0x40;
var x,i:integer;
begin
for i:=0 to 40 do begin
x:=sqr(i)+i+41;
write(' x(',i,')=',x);
end;
<span>end. </span>
Импортировать это значит добавления вставка данных из внешнего источника в в текущий файл документ экспортр вывод данных текущего файла документа во внешний источник