Muốn kiểm tra giá trị A,B có khác nhau hay không ta viết câu lệnh thế nào cho đúng

-Câu lệnh kiểm tra:

     if A<>B then write(‘Khac’)   else write(‘Giong’);

-Chương trình:

program kiem_tra;

uses crt;

var a,b:integer;

begin

       clrscr;

       write(‘Nhap a: ‘);  readln(a);

       write(‘Nhap b: ‘);   readln(b);

       if a<>b then write(‘Khac’)  else write(‘Giong’);

       readln;

end.