Program Chuong_trinh1; Uses Crt; Var S,n:integer; Begin S:=0;n:=0; While S>50 do begin n:=n+1;S:=S+n end; Writeln('So n nho nhat de tong > 50 la',n); Writeln('Tong dau tien > 50 la',S); end. Cho hỏi sau khi chạy ctr thì n=? ạ #Hi vọng sớm có câu trả Lời nà
2 câu trả lời
Chương trình này sai ở điều kiện while, phải sửa lại thành while S<=50 do thì chương trình mới chạy.
Kết quả:
Số n nhỏ nhất để tổng > 50 là 10 (n=10)
Tổng đầu tiên > 50 là 55 (S=55)
Vì nếu S>50 thì chương trình lặp vô hạn nên phải sửa điều kiện
Chương trình này sai ở điều kiện while, phải sửa lại thành while S<=50 do thì chương trình mới chạy.
Kết quả:
Số n nhỏ nhất để tổng > 50 là 10 ($n=10$)
Tổng đầu tiên > 50 là 55 ($S=55$)
Câu hỏi trong lớp
Xem thêm