Chươn 3 – bài 9 : Cấu trúc rẽ nhánh

Tìm lỗi sai của đoạn code này (Thiếu chỗ nào, thừa chỗ nào, có thực hiện đúng kết quả không?)

//chuong trinh kiểm tra kết quả học lực ( Van, Toan, Hoa, Tin)

Program BT;
Uses crt;
Var V, T, H, Tin, Tong: Real
Begin
       Clrscr;
       Write(‘Nhap diem Van, Toan, Hoa, Tin:’);
       Readln(V,T,H,Tin);
       Tong:= V+T+H+Tin
       if ( (Tong <20) or (V<2) or (T<2) or (H<2) or (Tin<2) );  then
              writeln(‘Rot’);
       else
              writeln(‘Dau’);
              if (V<=5) or (T<=5) or (H<=5) or (Tin<=5); then
                     writeln(‘Hoc chua deu cac mon.’);
              else
                     writeln(‘Hoc deu cac mon.’);
       Readln;
End.