RosettaCodeData/Task/Formatted-numeric-output/Fortran/formatted-numeric-output-1.f

3 lines
70 B
FortranFixed
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
INTEGER :: number = 7125
WRITE(*,"(I8.8)") number ! Prints 00007125