Đăng nhập để hỏi chi tiết
18
4
Pascal
Tính tổng N số tự nhiên
Ai giúp mình với ạ
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
uses crt;
var n,i,s:longint;
begin
clrscr;
for i:=1 to n do
s:=s+i;
write(S);
readln;
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
1288
689
uses crt;
var n,i:longint;
begin
clrscr;
write('Nhap n: '); readln(n);
write('Tong cac so la: ',(n*(n+1))/2:0:0);
readln
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
18
15
4
Bạn ơi mình làm máy mình cứ báo bị lỗi chữ for ấy, mình sửa mãi không đc
1196
25596
380
chưa nhập n thì lấy giá trị đâu ra mà chạy for =))