Working

functional program7
Program 7 final

working