CHO ĐOẠN CHƯƠNG TRÌNH SAU

1. Cho chương trình sau: Program Bai tap; {dong 1} Const a: 100; {dong 2} Var m,n,i: Interger; {dong 3} Begin {dong 4} N:= 0; {dong 5} While i a do n = n+3; {dong 6} Writeln(‘n=’;n); {dong 7} Realdn; {dong 8} End {dong 9} a. Hãy tìm và sửa lỗi trong chương trính. (2đ) b. Cho biết kết quả khi chạy chương trình trên (sau khi đã sửa lỗi) (2đ)