Talimat: İki sayıyı karşılaştırarak ilişkisel operatörlerin kullanımını göster.
Kod:
Var
  A, B : Integer;
  result : Boolean;
{
  A = 10;
  B = 20;
  result = A < B;
  ShowMessage(IntToStr(A) + ' < ' + IntToStr(B) + ' = ' + BoolToStr(result));
}