write huge

I just have a quick question.

This simple program

program WriteHuge

	  implicit none
  print *, huge(0.0d0)

	  write(*, *) huge(0.0d0)

	  write(*, '(E24.16)') huge(0.0d0)

	  write(*, '(E40.20)') huge(0.0d0)
end program WriteHuge

prints to the console

  1.797693134862316E+308

	  1.797693134862316E+308

	  0.1797693134862316+309

	              0.17976931348623157081+309

Why there is no 'E' in the last two lines? Is something wrong with the format?

Compiler version: XE 13.1