Linear Search Program in Liberty BASIC

Max = 5
REDIM Arr(Max)
Arr(1) = INT(RND(1) * 10) + 1
PRINT Arr(1); 

FOR I = 2 TO Max
  Arr(I) = Arr(I - 1) + INT(RND(1) * 10) + 1
  PRINT Arr(I); 
NEXT I
PRINT
INPUT "Which number do you want to find: "
Search = 0
FOR J = 1 TO Max
  IF Search = 0 THEN
    PRINT "Checking array location "; J
    IF Arr(J) = Find THEN
      Search = 1
    END IF
  END IF
NEXT J

IF Search = 1 THEN
  PRINT "Found it!"
ELSE
  PRINT "The number you want is not in the list."
END IF
END