Напишите программу ** языке Паскаль:Выяснить принадлежит ли точкаX отрезку от 1 до 10?...

Question

Напишите программу на языке Паскаль:Выяснить принадлежит ли точкаX отрезку от 1 до 10? Буду очень благодарна)

Answer 1

Var x:integer;
begin
readln(x);
if (x>1) and (x<10) then<br>writeln("Yes") else
writeln("No");
end.