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

link

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

program lesson9_3;
var
  a, b, c: integer;
begin
  a := 8;
  b := 7;
  c := 10;
  if((a > b) and (a < c)) then
      writeln('yes')
  else
      writeln('no');
  readln();
end.