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

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

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

Question

Евстрат

5 апреля, 12:35

+1

Ответы (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