Viết chương trình tính tổng S= 1+2+3+…+n sao cho S>1000. Hỏi khi đó cụ thể S bằng bao nhiêu. 22/08/2021 Bởi Ruby Viết chương trình tính tổng S= 1+2+3+…+n sao cho S>1000. Hỏi khi đó cụ thể S bằng bao nhiêu.
var s,n: longint; begin write(‘Nhap n: ‘); readln(n); for i:=1 to n do s:=s+i; write(‘Tong la: ‘,s); end. Bình luận
var s,n: longint;
begin
write(‘Nhap n: ‘); readln(n);
for i:=1 to n do
s:=s+i;
write(‘Tong la: ‘,s);
end.
var n:int64;
begin
write(‘Nhap n: ‘); readln(n);
write(‘S= ‘,(1+n)*n div 2);
end.