Delphi中有没有什么函数可以判断某数是否属于某个区间

Question

Delphi中有没有什么函数可以判断某数是否属于某个区间？？？谢谢 各位回答

Answer 1

集合
例如:
function fun1(n:integer):boolean;
begin
if n in [1..9] then
result:=true
else
result:=false;
end;

Answer 2

Function CheckNum_include(a,m,n:integer):boolean;
begin
  if (a>=n) and (a<=m) then
    result:=true
  else
    result:=false;
end;