RosettaCodeData/Task/Binary-search/PascalABC.NET/binary-search-2.pas

##
var s := |2,3,4,5,6,7,8,9,10,12,14,16,18,20,22,25,27,30|;
s.binarysearch(10).println;