===== PascalABC.NET =====
begin
var n := ReadInteger('Длина массива:');
var a := new BigInteger[n];
var k := BigInteger.One;
for var i := n-1 downto 0 do
begin
a[i] := k;
k *= 2
end;
a.Println
end.
4561,81,53,1,731,91это то что надо
Var array = [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20];
for (i=0;i<=array[i];i++)
{
if (array[i]>5) document.write(i)
}
Ответ:
7 так как нам нужно закодировать 76 элементов, а это больше чем 64 = 2^6, но меньше чем 2^7