1101001
Например:ббабааб,габааб,бвваб и тд
(20*1024*8)/1024=160
(20*1024*8)/2048=80
160-80=80
<span>Ответ: 80</span>
1)const
n1=1000;
type
mas=array[1..n1] of integer;
var
a:mas;
n,i:integer;
begin
readln(n);
for i:=1 to n do read(a[i]);
for i:=1 to n do write(a[i],' ');writeln;
<span>end.
А вторую и третью я объединила:
</span>const
n1=1000;
type
mas=array[1..n1] of integer;
var
a:mas;i,min:integer;
begin
randomize;
for i:=1 to 5 do a[i]:=random(101)+0;
for i:=1 to 5 do write(a[i],' ');writeln;
min:=a[1];
for i:=2 to 5 do if a[i]<min then min:=a[i];
writeln(min);
end.
Совершенно бесплатное порево
40 * 60 * 32 / 8 = 9600
Ответ: <span>г) 9600 байтов</span>