Заполните массив степенями двойки тк чтобы последнее число было всегда 1 , а предыдущее в 2 раза бальше следующего паскаль
36 16 8 4 2 1
в информатике не шарю
напишешь прогу?
Var a: array[1..10] of integer; i,j:integer;begin j:=1; for i:=10 downto 1 do begin a[i]:=j; j:=j+j; endend.