Program nums;
<span>var num:array[1..1000] of integer;
</span><span>var i,maxnum: integer;
</span><span>
begin
</span><span>Randomize;
</span><span>for i:=1 to 1000 do num[i] := random(1000000);
</span><span>for i:=1 to 1000 do
</span><span>begin
</span><span>if num[i] > maxnum then maxnum:=num[i];
</span><span>end;
</span><span>Writeln('самое большое число ',maxnum);
</span><span>end.</span>
Ответ 2)
32000*32*4*х=503316780
х=503316480/4096000
х=112 секунд=2 минуты
Формула: N=2^i
Где N - <span>количество возможных информационных сообщений
I - </span><span>количество информации</span>