program main

real::C,Fahrenheit

write(*,*)"Enter the temperature in celcius degree"

read(*,*)C

Fahrenheit=(9*C/5.0)+32
write(*,*)"The temperature in fahrenheit=",Fahrenheit
end program main

Embed on website

To embed this project on your website, copy the following code and paste it into your website's HTML: