program temptable
	  
************************************************************************
* Program to convert a  tablulate temperature of DEGC degrees          *
* on the Celsius scale to the corresponding                            * 
* temperature  DEGF on the Fahrenheit scale.                           *
* Variables:                                                           *
* DEGC - Celsius temperature                                           * 
* DEGF - Fahrenheit temperature                                        * 
* UNIT - unit division for table                                       *    
* STEP - no of units in table                                          *       
* Input:  UNIT: step unit of  table                                    *
* Output:  Table of Celsius to Fahrenheit                              *
************************************************************************

	  REAL DEGC, DEGF
	   
	  INTEGER UNIT, STEP

	  print *, 'Enter the number of unit steps of degrees celsius'
	  read *, UNIT
	  
	  STEP = 100 / UNIT
	  print *, 'Temperature Celsius      Temperature Fahrenheit'
	  print *, '===================      ======================'
	  DO 10 DEGC = 0, 100, STEP
	  
	  DEGF = (9.0/5.0) * DEGC + 32.0

	  print *, '      ', DEGC, '                 ', DEGF
	  
10    CONTINUE
	  end