Write a VB A program to do the following (25 pts) Using a series of input boxes, prompt the user for the following characteristics of a roller coaster . a. b. c. d. e. Empty coaster mass (kg) Number of occupants (persons) Average mass per occupant (kg/person) Velocity at crest of first hill (m/s) Vertical drop from top to bottom of first hill (m) Write the user response values into cells B1, B2, B3, B4, and B5 of the worksheet, and provide the quantity name in cells Al to A5, and appropriate units in cells Cl to C5 . (25 pts) Within your VBA program, compute the total mechanical energy of the coaster at the top of the hill (M) relative to the bottom of the hill (i.e., the Ah from item #le. is the relevant term for the gravitational potential energy). Output this amount to a message box including the units. 3. (25 pts) Within your VBA program, compute the fraction of total mechanical energy at the top of the hill that is kinetic energy (e.g., if the initial total mechanical energy is 50 MJ, with 40 MJ gravitational, and 10 MJ kinetic, the fraction is 0.2), and write it to the worksheet in row 6 (name in column A, value in column B, units in C). Do the same for fraction of total mechanical energy that is gravitational potential energy and write to row 7 1. (25 pts) Finally, within your VBA program, compute the coaster velocity at the bottom of the hill (m/s) and write it to the worksheet in row 8 (name in column A, value in column B, units in C)