回 帖 发 新 帖 刷新版面

主题:求助:关于READ读取文件

最近在读一份FORTRAN编写的老程序,当时是用microsoft FORTRAN 4.01编译的。

关于文件读取的部分看的有点迷糊。

首先,整份程序中没有出现OPEN、CLOSE文件的语句。

其次,程序中多次出现了形如 READ('NEW','(A3)') AAA 的语句,后面AAA还可以使用。以我现在所学,实在不清楚‘NEW’是代表了什么,是属于哪种格式的?

请高手指教,非常感谢!!

回复列表 (共6个回复)

沙发

我现在感觉是不是把“NEW”赋值给AAA呀?有这样的语法吗?
怎么没有人回答呢。

板凳

又有问题了

IF (CASE) 110,180,120

有一句是这样的。是不是可以理解为CASE小于0,等于0,大于0时分别跳至110,180,120?

3 楼

[quote]又有问题了

IF (CASE) 110,180,120

有一句是这样的。是不是可以理解为CASE小于0,等于0,大于0时分别跳至110,180,120?[/quote]

是的。正是如此。

这是一种老编译器所做的扩展,不太符合语法规定。建议能看懂,不要自己这么写。

4 楼

[quote][quote]又有问题了

IF (CASE) 110,180,120

有一句是这样的。是不是可以理解为CASE小于0,等于0,大于0时分别跳至110,180,120?[/quote]

是的。正是如此。

这是一种老编译器所做的扩展,不太符合语法规定。建议能看懂,不要自己这么写。[/quote]


那请问如果我想重新编译此程序,应该使用哪种编译器呢?

5 楼

一般的编译器都会向下支持这些老语法的。

也就是说,老语法也能通过编译。只不过不推荐你在新书写的代码里使用这样的语法而已。

如果你的编译器不能通过这样的代码编译,你也可以用新的语句来代替它。如果这样的话,可能会比较麻烦。对代码的修改会比较大。

6 楼

[quote]一般的编译器都会向下支持这些老语法的。

也就是说,老语法也能通过编译。只不过不推荐你在新书写的代码里使用这样的语法而已。

如果你的编译器不能通过这样的代码编译,你也可以用新的语句来代替它。如果这样的话,可能会比较麻烦。对代码的修改会比较大。[/quote]

非常感谢。

我来回复

您尚未登录,请登录后再回复。点此登录或注册