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