如何在fortran中添加双精度制表符？

program add_tab
  implicit none
  
  real(kind=8) :: num1, num2, result
  
  ! 输入双精度数值
  write(*, *) "请输入两个双精度数值："
  read(*, *) num1, num2
  
  ! 计算结果
  result = num1 + num2
  
  ! 输出结果，并使用制表符对齐
  write(*, '(F12.2, A, F12.2)') num1, CHAR(9), num2
  write(*, '(A, F12.2)') "结果：", result
  
end program add_tab