Дано натуральное число n. Вычислить через while и for

S=1∙2+2∙3+3∙4+⋯+n∙ (n+1)

Question

Информатика

Аливтина

29 ноября, 17:25

Дано натуральное число n. Вычислить через while и for

S=1∙2+2∙3+3∙4+⋯+n∙ (n+1)

+3

Ответы (1)

Знаешь ответ?

Агыот · Answer 1

var n, I, s, sum:integer;

begin

writeln ('ввести огрничение n');

readln (n);

sum:=0;

for i:=1 to n do begin

s:=i * (i+1);

sum:=sum+s;

writeln (sum);

end;

readln

end.

Дано натуральное число n. Вычислить через while и forS=1∙2+2∙3+3∙4+⋯+n∙ (n+1)

Дано натуральное число n. Вычислить через while и for

S=1∙2+2∙3+3∙4+⋯+n∙ (n+1)