fork download
copy 
  1. program TEST
  2.  
  3. real :: x(10) = -1
  4. integer :: i
  5.  
  6. read(*, *, iostat = i) x
  7. write(*, *) x
  8.  
  9. end
Success #stdin #stdout 0s 3972KB
comments ()
stdin
copy 
44.111
22.2
3.333
6.444444
8.55
111.666
stdout
copy 
   44.1110001       22.2000008       3.33299994       6.44444418       8.55000019       111.666000      -1.00000000      -1.00000000      -1.00000000      -1.00000000
https://ideone.com/Qu9PEZ
language:
Fortran (gfortran 8.3)
created:
9 years ago
visibility:
secret

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!