10. Hãy tìm lỗi sai và sửa lại cho đúng.
Uses crt;
Program cau1;
Var toan ; van; tbc ; anh , interger ;
Clrscr ;
begin
writeln(‘nhap vao diem toan:’) ; readln(toan)
writeln(‘nhap vao so diem van: ‘) ; readln(van)
writeln(‘nhap vao so diem anh: ‘) ; readln(anh)
tbc:=(van+toan+anh)/3;
writeln(‘diem trung binh la: ‘, tbc);
readln
end.