Решить в паскале : проверка принадлежности часла x интервалу (a;b)
Var x, a, b, c, d: integer; begin readln(x, a, b); if ((x > a) and (x < b)) then writeln(a; b); end.
var x, a, b: integer;
Var x, a, b,., c, d: integer; begin readln(x, a, b); if ((x > a) and (x < b)) then writeln(a; b); end.