Binary search: Difference between revisions
Content deleted Content added
| Line 655: | Line 655: | ||
120 NUMERIC ARR(1 TO 20) |
120 NUMERIC ARR(1 TO 20) |
||
130 CALL FILL(ARR) |
130 CALL FILL(ARR) |
||
140 INPUT PROMPT "Value: ":N |
140 PRINT:INPUT PROMPT "Value: ":N |
||
150 LET IDX=SEARCH(ARR,N) |
150 LET IDX=SEARCH(ARR,N) |
||
160 IF IDX THEN |
160 IF IDX THEN |
||