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

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

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

Решение:

var
  a,b,c:integer;
begin
  readln(a,b,c);
  if ((a > b) and (b > c)) or ((a < b) and (b < c)) then
    writeln('YES')
  else
    writeln('NO');
  readln();
end.