＜WRITE Example Program＞

Program write_example
  Write (*,*) (i,i=1,3)
  Write (*,*) (5,j=1,3)}
End Program

■ Execution Results

  1  2  3
  5  5  5