Задача 5 Урок 9

Задача 5 Урок 9:

Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число A находится между числами B и C» -- выведите "да", если истинно и "нет" если ложно.

var A,B,C:integer;
begin
  A:=13;
  B:=12;
  C:=15;
  if ((A > B) AND (A < C)) then
     writeln('Yes')
  else
     writeln('No');
  readln();
end.