Program 2.Exercise6.2. 온도 변환 (2nd Version)

PROGRAM Temperature_Conversion_2
!---------------------------------------------------------------------------------
!	Program to convert a temperature on the Celsius scale to the
!	corresponding temperature on the Fahrenheit scale.
!	Variables used are:
!	Celsius		: temperature on the Celsius scale
!	Fahrenheit : temperature on the Fahrenheit scale
!
!	Input		: Celsius
!	Output 	: Fahrenheit
!---------------------------------------------------------------------------------
	
	IMPLICIT NONE
	REAL :: Celsius, Fahrenheit

	!	Obtain Celsius temperature
	PRINT *, "Enter temperature in degrees Celsius:"
	READ *, Celsius

	!	Calculate corresponding Fahrenheit temperature
	Fahrenheit = 1.8 * Celsius + 32.0

	!	Display temperature
	PRINT *, Celsius, "degrees Celsius =", & 
	Fahrenheit, "degrees Fahrenheit"

	pause
End PROGRAM Temperature_Conversion_2