Question

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

Answer 1

var

  a, b, c: integer;

 

begin

  writeln('Введите числа a, b, c');

  readln(a, b, c);

  if (b > a) and (b < c) then writeln('Истинно')

  else writeln('Ложно');

end.