chắc là sửa lỗi nhỉ
dòng 11: thiếu ''[i]''
=> Readln(A[i]);
dòng 16: sai ở dấu ''<>'', dư cặp dấu ngoặc đơn và thiếu ''[i]''
=> If A[i] mod 2=0 then Tong:=Tong+A[i];
Dư cụm Begin .... End; ở dòng 15 và 17
mình nghĩ còn sai ở khai báo ''tong''(sửa thành ''Tong'') và lệnh clrscr; ở dòng 9(vì mình thấy thường nó ở đầu phân thân). Mình chỉ nghĩ thôi ko rõ(mình nghĩ thế do lúc học toàn ghi thế à), mà bài tập này là bạn phải viết trên máy mà
Đúng 0
Bình luận (0)
