20. The net heat exchange by radiation from plate 1 with radius b to plate 2 with radius a that are separated by a distance c is given by:

where and are the absolute temperatures of the plates, W/(m2-K4) is the Stefan-Boltzmann constant, and is a shape factor which, for the arrangement in the figure, is given by:

where , , and . Write a script file that calculates the heat exchange q. For input the program asks the user to enter values for , ,

a, b, and

c. For output the program prints a summary of the geometry and temperatures and then prints the value of q. Use the script to calculate the results for K, K, m, m, and , 1, and 10 m.