Chương trình tính Thương hai số

Program Thuonghaiso_Program;
Var
Var a,b: Integer;

Begin
Write( ‘Nhập a: ’); Readln(a);
Write( ‘Nhập b: ‘); Readln(b);
If b 0 then
Write( ‘Thương hai số vừa nhập: ’,a/b:5:2);
Readln;

End.