RosettaCodeData/Task/Binary-search/Zkl/binary-search-2.zkl
2017-09-25 22:28:19 +02:00

6 lines
191 B
Text

list:=T(1,3,5,7,9,11); println("Sorted values: ",list);
foreach i in ([0..12]){
n:=bsearch(list,i);
if (Void==n) println("Not found: ",i);
else println("found ",i," at index ",n);
}