fork download
  1. program jog
  2. integer ::a,b,result
  3.  
  4.  
  5. read*,a
  6.  
  7.  
  8. read *,b
  9.  
  10. result =a+b
  11.  
  12. print *,result
  13. end program jog
Success #stdin #stdout 0s 5316KB
stdin
6
7
stdout
          13