nhungtuyetbui08@gmail.com Học sinh Thành viên 8 Tháng chín 2021 90 64 36 15 Tháng ba 2022 #1 [TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn Chắc suất Đại học top - Giữ chỗ ngay!! ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn. /Em hãy viết chương trình tìm số n sao cho tổng các số từ 1 đến n nhỏ nhất và lớn hơn 1000(Biết n nhập từ bàn phím)
[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn Chắc suất Đại học top - Giữ chỗ ngay!! ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn. /Em hãy viết chương trình tìm số n sao cho tổng các số từ 1 đến n nhỏ nhất và lớn hơn 1000(Biết n nhập từ bàn phím)
Oralie Học sinh Thành viên 17 Tháng ba 2022 16 74 31 16 Thanh Hóa 24 Tháng ba 2022 #2 Đây bạn nha uses crt; var n,i,s:integer; begin clrscr; n:=1; s:=0; repeat s:=s+n; n:=n+1; until s>1000; writeln(n); readln; end. Upvote 0 Downvote
Đây bạn nha uses crt; var n,i,s:integer; begin clrscr; n:=1; s:=0; repeat s:=s+n; n:=n+1; until s>1000; writeln(n); readln; end.