Question

Помогите составить программу для вычисления выражения на паскале

Answer 1

var
  n,i:integer;
  a,an,s:real;
begin
  Write('Введите a и n: ');
  Read(a,n);
  s:=0;
  an:=1;
  for i:=0 to n do
  begin
    s:=s+(i+1)*an;
    an:=an*a
  end;
  Writeln('Ответ ',s)
end.

Результат выполнения программы
Введите a и n: 2.2 30
Ответ 1036213351740.38

Answer 2

Замечание: "an" хранит значение "a" в степени, необходимой для выполнения следующего шага.

Answer 3

Так экономнее, а кроме того, стандартный Паскаль не имеет операции возведения вещественного числа в степень.

Answer 4

Точнее, в степень, не равную 2.