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

Урок 9

Даны три целых числа: A, B, C. Проверить истинность высказывания:
«Число A находится между числами B и C» -- выведите "да",
если истинно и "нет" если ложно.
ПРИМЕЧАНИЕ: эта следующая задача базируются на том, что мы уже решали
(см. задачи в конце урока).

var a, b, c: integer;

begin

  writeln('Vvedite pervoe chislo (int) A =');
  readln(a);
  writeln('Vvedite vtoroe chislo (int) B =');
  readln(b);
  writeln('Vvedite tretye chislo (int) C =');
  readln(c);

  if ((a < b) AND (a > c) OR (a < c) AND (a > b)) then
     writeln('da')
  else
      writeln('net');

  readln();

end.     

КОНСОЛЬ

Vvedite pervoe chislo (int) A =
100
Vvedite vtoroe chislo (int) B =
50
Vvedite tretye chislo (int) C =
200
da