M = 64*64*1024;
I = M*N = 64*64*1024*8 - в битах
(64*64*1024*8)/(8*1024*1024) = 4 - в Мбайтах.
Const n = 10;
var x: array[1..n] of integer;
i: integer;
begin
Randomize;
for i := 1 to n do
begin
x[i] := Random(11);
Write(x[i]:4)
end;
end.
<span>Для построения графика в Excel по двум точкам необходимо заполнить значения Х и У. Для этого создаем таблицу для значений Х и У и заполняем ее. В нашем случаи нам понадобится внести по одному значению в Х и У. Как только вы внесли значения, заходим в меню ВСТАВКА и выберем пункт ГРАФИК. После чего вы увидите на своем мониторе график, построенный под двум точкам.</span>
Var a,i,n,k : integer;
Begin
randomize;
Readln(n);
for i:=1 to n do begin
a:=random(7)-3;
if a=0 then k:=k+1;
writeln(i,' число = ',a);
end;
Writeln('Количество 0: ',k);
end.
Частично и часто...спасибо за внимание.