fork download
copy 
  1. PROGRAM temp_conversion
  2. REAL::temp_f
  3. REAL::temp_k
  4. print *,'Enter the temperature in degrees Fahrenheit:'
  5. read *,temp_f
  6. temp_k=(5./9.)*(temp_f-32.)+273.15
  7. print *,'degrees Fahrenheit=',temp_k,'kelvins'
  8. END PROGRAM temp_conversion
Success #stdin #stdout 0s 5316KB
comments (?)
stdin
copy 
5
12
stdout
copy 
 Enter the temperature in degrees Fahrenheit:
 degrees Fahrenheit=   258.149994     kelvins
https://ideone.com/p86mTd
language:
Fortran (gfortran 8.3)
created:
1 day ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!