Составить программу вычисления суммы n первых членов арифметической прогрессии по первому ее члену и разности
Составить программу вычисления суммы n первых членов арифметической прогрессии по первому ее члену и разности
Гость
Ответ(ы) на вопрос:
Гостьvar n:integer; s,a1,d:real; begin readln(a1,d,n); s:=(2*a1*n+d*n*(n-1))/2; writeln(s); end.
Не нашли ответ?
Похожие вопросы