Реши

Конечно, давай решим эту задачку вместе.

Тебе нужно написать программу на языке Паскаль, которая проверяет, лежит ли число B между числами A и C. Итак, давай пошагово заполним пропуски в программе:

На месте второй строки должна быть переменная, в которой будем хранить наши числа. Мы можем использовать переменные целого типа, например: var A, B, C: integer;

В четвертой строке нужно запросить и считать первое число:

Write('Введите число A: ');
Readln(A);

В седьмой строке пропущен код для чтения переменной B, который будет выглядеть так:

Readln(B);

В десятой строке аналогично считываем переменную C:

Readln(C);

В одиннадцатой и тринадцатой строках нам нужно написать условие и вывод результата. Проверка условия, что B находится между A и C, может быть записана как (A < B) and (B < C). Если это условие истинно, то печатаем 'Число B находится между A и C', иначе 'Число B не находится между A и C'.

Итак, условный оператор будет выглядеть так:

if (A < B) and (B < C) then
  Writeln('Число B находится между A и C')
else
  Writeln('Число B не находится между A и C');

В итоге у тебя должно получиться что-то вроде этого:

program N;

var A, B, C: integer;

begin
  Write('Введите число A: ');
  Readln(A);

  Write('Введите число B: ');
  Readln(B);

  Write('Введите число C: ');
  Readln(C);

  if (A < B) and (B < C) then
    Writeln('Число B находится между A и C')
  else
    Writeln('Число B не находится между A и C');

end.

Теперь у тебя есть программа для проверки, находится ли число B между числами A и C. Проверь, все ли понятно, и запускай программу!