[Fortran] 纯文本查看 复制代码

查看代码

打印?

1	do x = 1 , 4

2	if( x/=j ) then

3

...

4

end if

5

end do

bbbsssmmm 发表于 2019-9-16 14:10
麻烦再请问一下，我调试了之后出现了一堆warning是怎么回事呀

哦哦我好像知道了

啊不是，是我自己写的，但是因为我刚刚接触，有好多基本规则都不太清楚，写的乱七八糟的。。

lz这个代码是从网上找的N手代码吧？
原版就不能运行吗？
http://rosettacode.org/wiki/24_game/Solve#Fortran

谢谢！！

1. 数组 num 用 a b c d 初始化，这是不允许的。除非 a b c d 是常量或者 enum
2. symbols 的数组定义，应该放在定义区，不能在 call swop 后面。fortran的定义必须在所有执行语句的前面