Ideone.com

fork download

copy

Program temp_conversion
real::f,k
read *,f
k=(5./9.)*(f-32.)+273.15
print *,k,'kelvins'
end Program temp_conversion

Success #stdin #stdout 0.01s 5320KB

stdin

copy

5
12

stdout

copy

   258.149994     kelvins

https://ideone.com/N7weHX

language:

Fortran (gfortran 8.3)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

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