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

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

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

var
   a,b,c : integer;

begin
  a:=9;
  b:=22;
  c:=8;
  if  ((a>b) and (a<c)) or ((a<b) and (a>c)) then
    writeln ('da')
  else
    writeln ('net');
  readln();
end.