How to pad Fortran floating point output with leading zeros?

Question

I have some floating point numbers that I need to output from a Fortran program. Let\'s say the maximum number could be 999.9999 and they are all non-negative. I need zero

Answer 1

This works for me

real :: areal

then

write(*,'(i3.3,f0.6)') int(areal),areal-int(areal)