Var a:array[1..15]of integer;
i,max:integer;
Begin
for i:= 1 to 15 do
a[i]:=random(100);
max:= a[1]+a[2];
for i:= 1 to 14 do
if max < a[i]+a[i+1] then
max := a[i]+a[i+1];
writeln(max);
End.
В 2-ой - 110000010
в 8 - ой - 602
<span>в 16 - ой - 182</span>
<span>Ответ: <span> 1001011111100</span> :<span> 101101</span> =<span> 1101100</span><span>.</span></span>
По моему так Оригинал, модель
32=2^5 ---> 5 бит - 1 символ
1) КУКАКА = 6 символов=6*5=30 битов
2) 8*16*5= 640 битов=80 байтов