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 *,k
  9. end program my_first_program
Success #stdin #stdout 0.01s 5320KB
comments (?)
stdin
copy 
5 4
stdout
copy 
  
  
          20
https://ideone.com/mGvRPs
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!