program-id. Program1 as "ConsoleApplication6.Program1".

       data division.
       working-storage section.
       01 degree pic zzz.99.
       01 faran pic zzz.99.
       01 operation pic 999 value 0.

       Screen section.
       01 myScreen.
           05 BlankScreen
               foreground-color 2
               background-color 6.

         05 line 1 col 1 value "Conversion table".
         05 line 2 col 1 value " Degree     Fahrenheit".


       procedure division.

       100main.
       Display myScreen
       Display ""
       Display ""

       perform until operation > 150
       perform 200getConv

       display degree "       "faran
       add 10 to operation

       end-perform.



           stop run.

       200getConv.
       compute faran rounded = ((9/5)*operation) + 32.
       move operation to degree.


       end program Program1.