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

Sửa lại chương trình sau : 
Program tinh hieu ; 
Uses crt 
Var a,b : = integer ; 
S= real ; 
Begin
Writeln ( ' Nhap số nguyen duong a : ' ) Readln (a);
Writeln ( ' Nhap số nguyen duong b : ' ) Readln (b); 
S : = a - b 
Writeln ( ' Hieu hai so nguyen duong a va b la : ' , S : 2 : 2 ) 
Readln 
End .