Const n=100;
var a: array [1..n] of integer;
s,i: integer;
begin
s:=0;
for i:=1 to n do
{ вывод массива на экран }
begin
a[i]:=Random(100);
write(a[i],' ');
if (i mod 10 =0) then writeln();
end;
{ подсчет суммы элементов, кратных 3 }
for i:=1 to n do
if (a[i] mod 3 =0) then s:=s+a[i];
writeln('сумма равна ',s);
end. <span>
</span>
Скорее всего ручка.
Хотя вернее всего ручка
2^35 * 8 = 2^38 бит
в кбите 1024 бит
2^38 : 1024 = 268 435 456 кбит
в 1 мбите 1024 кбит
268 435 456 : 1024 = 262 144 мбит
в 1 гбите 1024 мбит
262 144 : 1024 = 256 гбит
ответ 256
128 мбит : 8 = 16 мбайт
16 * 1024 = 16384 кбайт
16384 * 1024 = 155 777 216 байт
ответ 155 777 216