Question

составить программу на языке Паскаль
Принадлежит ли число n интервалу (a,b).

Answer 1

var a,b,n:integer;
begin
readln(a);//начало интервала
readln(b);//конец интервала
readln(n);//число
if (k>=a) and (k<=b) then
writeln('пренадлежит')
else writeln('не пренадлежит')
end.