30 за верно решенное .

1. заполните массив степенями числа 2, начиная с конца, так чтобы последний эле-мент массива был равен 1, а каждый предыдущий был в 2 раза больше следующего. например: 32 18 8 4 2 1

rustam20041g rustam20041g    1   24.12.2019 17:33    2

Ответы
Мейдей Мейдей  10.10.2020 22:59

===== 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.


30 за верно решенное . 1. заполните массив степенями числа 2, начиная с конца, так чтобы последний э
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика