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

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<br>writeln('пренадлежит')
else writeln('не пренадлежит')
end.

Comments

if n>=a and n<=b замените просто под ваше условие забыл исправить