Ребята, хелп ((Не шарю вообще. Тема - циклы

1) Написать программу вычисления суммы:

S=123+234+345 + ... + 212223

Question

Шарлотта

27 сентября, 17:55

+5

Ответы (1)

Знаете ответ на вопрос?

Римуля · Answer 1

Var i, s:integer;

begin

s:=0;

for i:=1 to 21 do s:=s+i * (i+1) * (i+2) ; writeln ('s = ', s) ;

end.

Результат:

s = 63756

Ребята, хелп ((Не шарю вообще. Тема - циклы1) Написать программу вычисления суммы:S=1*2*3+2*3*4+3*4*5 + ... + 21*22*23