Program closing

[Daichi]

Hello guys, i'm new at the Fortran language, and i'm having some problems..

I made this source:

program number


print*, 'Choose the first number'
read*, i
print*, 'Choose the second number'
read*, h

if (i.GE.h) then
print*, i, ' is greater than ', h
else
print*, i, ' is not greater than ', h
end if

stop
return
end


My problem is that when the program ends, it's getting closed...

How can i fix this?

 

[Daichi]

I forgot to tell you that i'm using force 3.0

 

[xwb]

Try adding a PAUSE before the stop.