fork download
  1. program Addnumbers
  2. real::s,b,result
  3. write(*,*)' :'
  4. read(*,*)s,b
  5. result=s+b
  6. write(*,*) 'result=',result
  7. end program Addnumbers
Success #stdin #stdout 0.01s 5324KB
stdin
5
4
stdout
  :
 result=   9.00000000