Create an application in VB that allows the user to enter an object’s mass, velocity, and height and displays the object’s KE and PE. The application should have a two functions: KineticEnergy that accepts an object’s mass (kilograms) and velocity (meters/second) as arguments and PotentialEnergy that accepts an object’s mass (kilograms), acceleration due to gravity (m/s2 ), and height (meters) as arguments. The function should return the objects KE and PE (3 decimal places).

Along 8-cm diameter steam pipe whose external surface temperature is 900c connects two buildings. the pipe is exposed to ambient air at 70c with a wind speed of 50 km/hr blowing across the pipe. determine the heat loss from the pipe per unit length. (b) air at 500c enters a section of a rectangular duct (15 cm x 20 cm) at an average velocity of 7 m/s. if the walls of the duct are maintained at 100c. a) the length of the tube for an exit temperature of the air to be 40 0c. b)the rate of heat transfer from the air. c) the fan power needed to overcome the pressure drop in this section of the duct.