Tìm ra 5 lỗi có trong chương trình sau?

 Tìm ra 5 lỗi có trong chương trình sau?
Programe  Cau1;    
   Var A=Real;    
Begin    
   Write(‘Nhap A:’); Realn(a);    
   A = A* A;    
   Writeln(‘Binh phuong cua a la:’, A);    
   Readln;    
     End;