разобраться как это работает n:= 10;
for i:= 1 to n do begin
A[n+1-i]:= 2*A[i];
end;

ответ: Вот

Объяснение:

Программа для фильтрования мусора, например. Думаю было бы круто, имхо сейчас очень остро стоит вопрос об загрязнении окружающей среды. В программе была библиотека\каталог всевозможных веществ\предметов и тд, где можно посмотреть всю инфу о том, как и куда выбрасывать, какой вред несет, время разложения. +плюшки по типу: выбросил 4 пластиковые бутылки, получил виртуальную валюту, какую можно как-то использовать локально, в городе.(это же городская проблема, власти это решить+тема годная)

1)32Кбайт=32*1024байт=32768байт
1байт=8бит
32768байт=32768*8 бит=262144бит
262 144 бит/(4096 бит/с)=64с
64с*1024бит/с=65536бит-размер
65536бит=65536/8 бит=8192байт
2)
60 кбайт=60*1024 байт=61440 байт
1 байт=8 бит
61440 байт=61440*8 бит=491520бит
491520/4096=120с
491520/1024=480с
4080-120=360с=6минут
3)
2Кбайт=2*1024байт=2048 байт=16384 бит
16384/256=64 секунд
64*2048бит=131072 бит=16384 байт
4)
8Мбайт=8*1024к байт=8*1024*1024байт=8388608байт
8388608/100=83886,08 байт/с
83886,08 байт/с*25с=2097152 байт=2048Кбайт
5)
Файл размером 8 Кбайт передается через некоторое соединение за 64 секунды.Определите, за сколько секунд можно передать этот же файл через соединение,скорость которого на 1024 бит в секунду больше 
8Кбайт=8192байт=65536 бит
65536бит/64с=1024 бит/с
1024 бит/с+1024 бит/с=2048 бит/с
65536 бит/(2048 бит/с)=32с