Зробіть будь ласка . Пайтон

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  SeqGen(ReadInteger('n='),i->1/(1+i)).Sum.Println; // №1
  // №2
  var a:=ArrGen(9,i->(i+1)*Sqr(i+1)); a.Println;
  Writeln('Кол-во=',a.Length,', S2=',a.Sum);
  Writeln('S3=',Range(2,100,2).Println.Sum); // №3
  Writeln('S4=',Range(1,99,2).Sum) // №4
end.

Пример
n= 65
4.75927551909038
1 8 27 64 125 216 343 512 729
Кол-во=9, S2=2025
2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76 78 80 82 84 86 88 90 92 94 96 98 100
S3=2550
S4=2500

Задача 1.
Объем видео можно рассчитать из формулы:
X=R*i*n*t, где R- количество пикселей на кадр, i-глубина цвета (бит), n-частота кадров (ед/сек.), t- время(сек.) 
Глубину цвета  i получим из формулы: N=2^i, где N-количество цветов.У нас черно-белое изображение, значит 2 цвета.
2=2^i   i=1 бит
R=800*600=480000
Х=480000*1*24*(30*60)= 20736000000 бит = 2592000000 байт= 2531250 Кбайт= 2471,92 Мбайт =  2,4 Гбайт
ответ: 2,4 Гбайт

Задача 2.
Рассчитаем объем видео:
X=R*i*n*t, где R- количество пикселей на кадр, i-глубина цвета (бит), n-частота кадров (ед/сек.), t- время(сек.) 
Х=(600*400)*8*25*(1,5*60)= 4320000000 бит= 540000000 байт= 527343,75 Кбайт= 514,98 Мбайт

Объем звука:
Х=i*n*t*k, где i - глубина кодирования звука (бит), n - частота дискретизации (Гц), t- время (сек.), k- количество каналов.
Глубину кодирования звука определим из формулы:N=2^i, где N- количество уровней громкости
128=2^i  i=7
Х=7*32000*(1,5*60)*2= 40320000 бит = 5040000 байт= 4921,88 Кбайт= 4,81 Мбайт
Сложим полученные значения объема видео и звука:
514,98+4,81= 519,79 Мбайт
ответ: 520 Мбайт