24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

N@天河

新虫 (初入文坛)

应助: 3 (幼儿园)
金币: 293.6
帖子: 39
在线: 21.6小时
虫号: 1181225
注册: 2010-12-31
专业: 机械摩擦学与表面技术

[交流] 求大神帮帮忙解释下，下面这段程序为什么不能使用打印打印指定的字符串已有5人参与

PROGRAM TEST1220
  IMPLICIT NONE
! 变量定义
  INTEGER :: I
! 打开硬件设备并输出
  OPEN(4, FILE = 'PRN',ERR=10)
DO I = 1, 10
   WRITE(4, '(1X, A, I3.3, A)') 'This is the ', I, 'line on the PAPER!'
ENDDO
  CLOSE(4)
  STOP

10 &
  PRINT *, 'Error on opening screen!'

END PROGRAM TEST1220

回复此楼

» 猜你喜欢

国自科送审了吗已经有4人回复
药学硕士，第一、第二作者已发表6 篇 SCI，药理方向及相关方向2026年/2027年博士申请已经有6人回复
一篇MDPI论文改变了学习工作和生活已经有5人回复
26年博士申请自荐-电催化已经有3人回复
收到国自然专家邀请后几年才会有本子送过来评已经有4人回复
考博已经有5人回复
26年申博自荐-计算机视觉已经有4人回复
药化及相关博士的申请已经有3人回复

1楼 2013-06-27 17:28:13

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

N@天河

新虫 (初入文坛)

应助: 3 (幼儿园)
金币: 293.6
帖子: 39
在线: 21.6小时
虫号: 1181225
注册: 2010-12-31
专业: 机械摩擦学与表面技术

引用回帖:

15楼: Originally posted by pippi6 at 2013-06-28 14:36:06
ok，我查了一下fortran help，名称‘PRN’确实被 compiler 保留成为打印机。‘CON’是屏幕。但如果 PRN 不工作，你也许可以试试 LPT1 。下面是部分 Filenames for Device I/O

Device Description
CON Co ...

我试了，只有CON这个默认的屏幕打印有用。fortran里有help命令？怎么查函数的用法呢