var
    list: array[0 .. 9] of real;
// ...
indexof := binary_search(123, list);