Windows 1251 - 8 бит
КОИ-8 - 8 бит
Не изменяется
Линейный алгоритм<span> - это такой, в котором все операции выполняются последовательно одна за другой. Хоть бы загуглил прежде чем баллы тратить</span>
Нужно умножить каждую единицу на двойку в степени n, где n - это позиция единицы справа начиная с нуля
здесь на "первом" месте справа (считаем с нуля) стоит ноль, поэтому нет 2^1
Var a,b:array of real;
i,n:integer;
begin
readln(n);
setlength(a,n);
setlength(b,n);
for i:=0 to n-1 do begin
read(a[i]);
b[i]:=a[i]/(i+1);
end;
for i:=0 to n-1 do
write(b[i],' ');
<span>end.</span>