fork download
copy 
  1. program TEST
  2. 	integer ans
  3. 		do
  4. 			read (*,*) ans
  5. 			if (ans.eq.42) stop
  6. 			write (*,*) ans
  7. 		enddo
  8. 	stop
  9. end
Success #stdin #stdout 0.01s 5280KB
comments (?)
stdin
copy 
1
2
10
42
11
stdout
copy 
           1
           2
          10
https://ideone.com/HY3Qn0
language:
Fortran (gfortran 8.3)
created:
9 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!