program TEST ! your code goes here real :: x(5) x = 12 print *, xend
Standard input is empty
12.0000000 12.0000000 12.0000000 12.0000000 12.0000000
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!