Ideone.com

fork download

program my_first_program
integer::i,j,k,result
print *,' '
read(*,*)i,j
k=i*j
print *,' '
result=k
end program my_first_program

Success #stdin #stdout 0s 5312KB

stdin

6
5

stdout

https://ideone.com/51S7sR

language:

Fortran (gfortran 8.3)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!