Write a program in Fortran-77 to sort an array of numbers entered from the keyboard and then using binary search, search for a number in the array. If the number is not found then it should ask for another number. The program should work in a loop to search for multiple numbers one by one without having to execute the program again.