Tin học Sửa lỗi trong Pascal

[Lý Hoài Nam]

[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.

[tex]A=x^{n}+x^{n+1}+x^{n+2} +...+x^{m}[/tex]
Mình chạy thử mà toàn ra A=0
Mình sai chỗ nào các bạn chỉ mình với ạ!

 

[Trâm Nguyễn Thị Ngọc]

[tex]A=x^{n}+x^{n+1}+x^{n+2} +...+x^{m}[/tex]
Mình chạy thử mà toàn ra A=0
Mình sai chỗ nào các bạn chỉ mình với ạ!View attachment 134593

Sai ở chỗ While n=m đó bạn
Phải là while n<=m mới đúng, cả lệnh n:=n+1 cũng phải đưa vào trong vòng lặp nữa..

 

[CuongGrove]

Nếu người chạy chương trình thực hiện theo lời của bạn ( nhập n nhỏ hơn m ) thì câu lệnh lặp while không thể thực hiện được => A không được gán giá trị, thì nó bằng 0.

 

[Hải Ham Học]

muốn n:=n+1 trong vòng while bạn dùng while....begin... d:=d+1; end; nha
kẹp begin .. end; vô câu lệnh cần tạo các "lệnh con" là được