回 帖 发 新 帖 刷新版面

主题:急,求高人指点

FUNCTION S2(SA,SB,SAB)
    S2=(SA+SB)/2.0+SQRT((SA-SB)**2/4.0+SAB**2)
    RETURN
    END
运行时提示说这部分有:
\fortran\fortran程序\fortran\TEXT1.FOR(150): error FOR3852: syntax error
F:\fortran\fortran程序\fortran\TEXT1.FOR(151): error FOR3205: inappropriate use    of symbol S2 detected between S2 and =
求问这是怎么回事啊?谢谢了

回复列表 (共4个回复)

沙发

代码段没有问题,到其他地方找问题。

板凳

试试这样:
FUNCTION S2(SA,SB,SAB) result(SS)
    SS=(SA+SB)/2.0+SQRT((SA-SB)**2/4.0+SAB**2)
    RETURN
    END
function 后面应该跟着result才行的

3 楼


谢谢,正在查找

4 楼


谢谢,我这个是在90的编译器上运行的77版的程序,估计问题是出在这儿

我来回复

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