<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
begin
var a:=ArrRandomInteger(ReadInteger('n->'),-100,100); a.Println;
Println('Сумма=',Range(0,a.Length-1,2).Aggregate(0,(s,z)->s+a[z]));
end.
Пример:
n-> 4
-63 28 -56 -1
Сумма= -119
На 1 символ надо log(2)128=7 бит;
на 600 символов 600*7 бит = 600*7 / 8 байт = 525 байт = 525 / 1024 Кбайт = 0,5126953125 Кбайт
1. X - (sqr(X) / 3) + (sqr(X) / 5);
2. i * n * abs(cos(X)) / i * n * (1 + sqr(X)) = abs(cos(X)) / (1 + sqr(X));
3. (sqr(X) - 7 * X + 10) / (sqr(X) - 8 * X + 12).