1.Sai chỗ "DT_hinh_chu nhat".
Sửa: Program DT_hinh_chu_nhat;
2. Thiếu dấu ";" ở cuối câu.
Sửa: Uses crt;
3. Sai chỗ chữ "Const".
Sửa: Var s,a,b: real;
4. Sai chỗ chữ "Bigin".
Sửa: Begin
5. Thiếu dấu ";" sau chữ "Clrscr".
Sửa: Clrscr;
7. Sai chỗ chữ "Realn".
Sửa: Readln(b);
8. Sai chỗ dấu "x".
Sửa: S:=a*b;
9. Sai chỗ "dien tich tam giac la" (tính diện tích hình chữ nhật nhưng lại kết luận diện tích tam giác??).
Sửa: Writeln ('Dien tich hinh chu nhat la:', s);
11. Thiếu dấu "." sau chữ "End".
Sửa: End.