Question

Плиз помогите, это паскаль.
Составить программу вычисления суммы
S=a+a 2 +a 3 +…+a n . а и n вводимые переменные.

Answer 1

var

 s, a, n, i: integer;

 

begin

 s := 0;

 read(a, n);

 for i := 1 to n do

 begin

   s := s + a * i;

 end;

 

 print(s); // если надо

end.