fork download
copy 
  1. program coshx
  2. real::x,res
  3. read *,x
  4. res=(EXP(x)+EXP(-x))/2.
  5. print *,'cosh(x)=',res
  6. end program
Success #stdin #stdout 0.01s 5316KB
comments (?)
stdin
copy 
3.0
stdout
copy 
 cosh(x)=   10.0676622
https://ideone.com/ZM0Uso
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!