威孚半导体技术
2024-08-19 广告
2024-08-19 广告
威孚(苏州)半导体技术有限公司是一家专注生产、研发、销售晶圆传输设备整机模块(EFEM/SORTER)及核心零部件的高科技半导体公司。公司核心团队均拥有多年半导体行业从业经验,其中技术团队成员博士、硕士学历占比80%以上,依托丰富的软件底层...
点击进入详情页
本回答由威孚半导体技术提供
展开全部
如果你使用 Visual Fortran 的 Windows 版本,你可以这样:
write(* , '(<n>f10.4)') rArray(1:N)
尖括号不是 Fortran 的标准语法,但 Visual Fortran 支持它。
另外一个办法就是用动态格式。
program Index_Test
implicit none
integer n
real :: rArray(20) = 3.0
character(Len=9) :: cFmt = "(??f10.4)"
n=20
write( cFmt(2:3) , '(i2)' ) n
write( * , cFmt ) rArray(1:N)
end program Index_Test
write(* , '(<n>f10.4)') rArray(1:N)
尖括号不是 Fortran 的标准语法,但 Visual Fortran 支持它。
另外一个办法就是用动态格式。
program Index_Test
implicit none
integer n
real :: rArray(20) = 3.0
character(Len=9) :: cFmt = "(??f10.4)"
n=20
write( cFmt(2:3) , '(i2)' ) n
write( * , cFmt ) rArray(1:N)
end program Index_Test
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询