function ContainNumber(
const Numbers: TArray<Integer>;
Number: Integer): Boolean;
var
CurrentNumber: Integer;
begin
for CurrentNumber in Numbers do
if CurrentNumber = Number then
Exit(True);
Result := False;
end;
var
Numbers: TArray<Integer>;
IsContain2, IsContain4: Boolean;
begin
Numbers := [1, 2, 3];
IsContain2 := ContainNumber(Numbers, 2);
//isContain2 is True
IsContain4 := ContainNumber(Numbers, 4);
//isContain4 is False
WriteLn('isContain2 is ', IsContain2);
WriteLn('isContain4 is ', IsContain4);
end.