如何在Fortran90中打印real和real8变量的所有小数？

program print_real_numbers
  implicit none
  real :: num_real
  real*8 :: num_real8

  ! 给变量赋值
  num_real = 3.14159
  num_real8 = 3.141592653589793

  ! 打印real变量的所有小数
  write(*, '(F20.16)') num_real

  ! 打印real8变量的所有小数
  write(*, '(F20.16)') num_real8

end program print_real_numbers

   3.1415901184082031
   3.1415926535897931