Sửa lỗi chương trình sau:

Sửa lỗi chương trình sau:
 Program bang_cuu_chuong
Uses crt;
Var N:read;
       i:integer
Begin
  clrscr;
   write('Nhap so N='); readln(N)<br />   writeln;<br />   write('Bang nhan',N)
   writeln;
   for i:=1 to 10 do
   writeln(N,'x',i2,'='N'
   readln
end.
 
Giúp mik vs ạ