Проверить истинность высказывания: «Данное число является четным двузначным» — Pascal(Паскаль)

Program Boolean16;

Var
  A: Integer;

Begin
  ReadLn(A);
  WriteLn(((A - 10 >= 0) And (A - 99 <= 0)) And Not Odd(A));

end.