Question

[Nông Hoàng Đức]

Viết chương trình tính tổng sau? Với n được nhập vào từ bàn phím?

S = 1.2 + 2.3 + 3.4 + .... + n.(n+1)

Answer 1

[Nguyễn Lê Phước Thịnh]

uses crt;
var s,i,n:longint;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
s:=s+i*(i+1);
writeln(s);
readln;
end.