tìm lỗi sai trong chương trình pascal sau đây và sủa sủa lại cho đúng:
         Chương trình lỗi                                                             
program Tinhx ;
Var x : integer
    Begin 
         X=3;
    If(45 mod 3)=0 then x:=x+2
    If x > 10 then x:= x + 10
     End
sưa lại chương trình
program Tinhx ;
Var x : integer;
    Begin 
         X: =3;
    If(45 mod 3)=0 then writeln x:=x+2;
    If x > 10 then writeln x:= x + 10;
     readln;
     End.