Проверить истинность высказывания: «Справедливо двойное неравенство A» — Pascal(Паскаль)

Program Boolean6;

Var
  A, B, C: Integer;

Begin
  ReadLn(A, B, C);
  WriteLn((A < B) And (B < C));

end.