fork download
copy 
  1. program my_first_program
  2. integer::i,j,k,result
  3. print *,' '
  4. read(*,*)i,j
  5. k=i*j
  6. print *,' '
  7. result=k
  8. print *,'result'
  9. end program my_first_program
Success #stdin #stdout 0.01s 5276KB
comments (?)
stdin
copy 
5 4
stdout
copy 
  
  
 result
https://ideone.com/5oWXC2
language:
Fortran (gfortran 8.3)
created:
3 days 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!