1 байт=2^3=8 бит
1 Кбайт=2^10=1024 байт
1 Мбайт=2^10=1024 Кбайт
2^33 бит =8589934592 бит
8589934592/8 бит=1073741824 байт
1073741824/1024 байт =1048576 Кбайт
1048576/1024 Кбайт=1024 Мбайт
1024/600=1,7066666666666666667
следовательно ответ 2
Const n=10;
var a:array[1..n] of integer;
max,min,i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=random(51);
write(a[i],' ');
end;
writeln;
max:=a[1];
min:=a[1];
for i:=1 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
if i mod 2 = 1 then a[i]:=min else a[i]:=max;
end;
for i:=1 to n do write(a[i],' ');
writeln;
end.
Пример:
<span>31 35 3 5 26 46 9 31 30 11
31 35 3 35 3 46 3 46 3 46 </span>
Var
a: array[1..6]of integer;
i,m: integer;
begin
for i:=1 to 6 do
read(a[i]);
writeln(' ');
For i:=2 to 6 do
if (a[i]<0) and ((i mod 2) =0) then
for m:=i downto 2 do
swap(a[m],a[m-1]); for i:=1 to 6 do
write(a[i]:2);
<span>end.
abc pascal</span>
(A×B)v(C×A)
(A×B) - 1
(C×A) - 2
A B C <u>B</u><u>C</u> 1 2 F
0 0 0 1 1 0 0 0
0 0 1 1 0 0 0 0
0 1 0 0 1 0 0 0
0 1 1 0 0 0 0 0
1 0 0 1 1 1 1 1
1 0 1 1 0 1 0 1
1 1 0 0 1 0 1 1
1 1 1 0 0 0 0 0
Спасибо, Вы правы. Ответ действительно <span>zxy
</span>