Task

Express a number in decimal as a fixed-length string with leading zeros.



For example, the number   7.125   could be expressed as   00007.125.




INTEGER :: number = 7125
WRITE(*,"(I8.8)") number   ! Prints 00007125