Binary search: Difference between revisions

Content added Content deleted
Line 663: Line 663:
200 END IF
200 END IF
210 DEF FILL(REF T)
210 DEF FILL(REF T)
220 LET T(1)=RND(3):PRINT T(1);
220 LET T(LBOUND(T))=RND(3):PRINT T(1);
230 FOR I=LBOUND(T)+1 TO UBOUND(T)
230 FOR I=LBOUND(T)+1 TO UBOUND(T)
240 LET T(I)=T(I-1)+RND(3)+1
240 LET T(I)=T(I-1)+RND(3)+1