Program 8.5
Program 8.5B