6. Даны натуральное число п, действительное число а Вычислить: (a + 1) + (a + 4)+...+(a + n2).

Программа, которая использует два массива

var 
c, a: array[1..20] of integer; 
i: integer;
begin 
write('Первый массив '); 
for i := 1 to 20 do   begin   
c[i] := i * (-5);   
write(c[i], ' '); 
end; 
writeln; 
write('Преобразованный массив '); 
for i := 1 to 20 do   begin   
a[i] := c[20 - i + 1];   
write(a[i], ' '); 
end;  
end.

ИЛИ  Программа не использующая два массива, а просто переворачивающая первый

var 
c: array[1..20] of integer; 
i: integer;
begin  write('Первый массив '); 
for i := 1 to 20 do   begin   
c[i] := i * (-5);   
write(c[i], ' '); 
end; 
writeln; 
write('Преобразованный массив '); 
for i := 20 downto 1 do  write(c[i], ' '); 
end.

Обе программы работают!

Десятичное(0 - 9):
Умножаем цифры числа на "веса" разрядов и складывает полученные произведения
Например:14351,1(¹⁰)=1·10⁴+4·10³+3·10²+5·10¹+1·10⁰+1·10-¹.
Двоичная(0 - 1):
Вычисляем сумму степеней двойки, соответствующих едениц в свёрнутой формуле двоичного числа
Например:10011(²)=1·2⁴+0·2³+0·2²+1·2¹+1·2⁰=19(¹⁰).
11(¹⁰)=1011(²)
Восьмеричная(0-7):
Перейдем к его развёрнутой записи и вычислим значение получившегося выражения
Например:1063(⁸)=1·8³+0·8²+6·8¹+3·8⁰=563(¹⁰)
103(¹⁰)=147(⁸)
Шестнадцатеричная(0-9,А-F):
A(10),B(11),C(12),D(13),E(14),F(15)
Например:3AF(¹⁶)=3·16²+10·16¹+15·16⁰=943(¹⁰)
154(¹⁰)=9A(¹⁶)