Ideone.com

fork download

program my_first_program
integer::a,b,k
read(*,*)a,b
k=a*b
print *,'result=',k
end program my_first_program

Success #stdin #stdout 0.01s 5288KB

stdin

5
4

stdout

 result=          20

https://ideone.com/8uNuDp

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!