Fortran 在（1）处的WRITE语句中应为表达式

这是一个简单的helloworld程序 !示例程序 主程序 隐式无 整数i 实x

write(6,*) ’Hello World!’
x=0
do i=1,10
x=x+i
if(mod(i,2).eq.0) then
write(6,*) i,x
else
if(x.lt.3) write(6,*) x,i
end if
end do

end

错误就来了

 write(6,*) ’Hello World!’
           1
Error: Expected expression in WRITE statement at (1)

---

这是因为你在

Hello world

中使用了卷曲引号。用直接的引号替换它们，它就会起作用

因此，替换

write(6,*) ’Hello World!’

与

---

我们能猜到您正在使用一些可怕的microsoft讨厌的文本编辑器吗？首先，请使用ISO_Fortran_env中的命名常量，而不是硬编码文件标识单元。第二，为什么不使用现代运算符来提高可读性，例如，

if（x<3）

而不是

if（x.lt.3）

。我还怀疑您编写的是固定格式的代码，而不是自由格式的代码，这反过来会导致大量容易避免的陷阱。

write(6,*) 'Hello World!'