Информатика, вопрос задал АртурГутов , 9 лет назад

найти сумму 10 членов арифметической прогрессии A,A+D,A+2D,...,где А - первый член прогрессии,D - постоянное слагаемое, разность прогрессии.Паскаль

Ответы на вопрос

Ответил Gleb1Kosyrev
0
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.
Новые вопросы