Найти сумму 10 членов арифметической прогрессии A,A+D,A+2D,...,где А - первый член прогрессии,D - постоянное слагаемое, разность прогрессии.Паскаль
Найти сумму 10 членов арифметической прогрессии A,A+D,A+2D,...,где А - первый член прогрессии,D - постоянное слагаемое, разность прогрессии.Паскаль
Гость
Ответ(ы) на вопрос:
Гостьvar
a,d,s,i:integer;
begin;
readln(a);
readln(d);
for i:=0 to 9 do
s:=s+a+d*i;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы