Помогите с информатикой!!! с клавиатуры вводится координата точки х, программа выводит ответ принадлежит ли точка отрезку от 20 до 40
Var x:integer; begin writeln('Введите координату точки X'); read(x); if (x>20) and (x<40) then writeln('Да принадлежит') else writeln('Нет, не принадлежит');<br>end.