作者Jesuscrash (被爱是一种幸福)
看板Fortran
标题[问题] 函数反解带入数值
时间Mon Mar 7 22:12:41 2011
各位先进:
不好意思，我又来问各位了
小弟我练习写了一个函数，想藉由得到函数值而来反解带入函数的数值为何?
但是compile出现错误，讯息为
Syntax error, found INTEGER_CONSTANT '5' when expecting one of: <LABEL>
<END-OF-STATEMENT> ; BLOCK BLOCKDATA PROGRAM TYPE COMPLEX BYTE CHARACTER...
5.0=F(C)+F(D)
以下为程式，不知道哪里出了问题@@"，不知道可不可以用函数去逆推带入的数值??
program fund
IMPLICIT NONE
REAL A,B,C,D
REAL, EXTERNAL :: F
A=1.0
C=A+1.0
D=B+1.0
5.0=F(C)+F(D)
WRITE (*,*) B
END PROGRAM
function F(X)
IMPLICIT NONE
REAL X,F
F=2*X
RETURN
END
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.125.202.117
1F：→ latinboy: 好可爱 03/07 22:56
2F：推 mjhsieh:哇... 不行啦！！！！ 03/08 05:16
3F：→ MHG:语法错误... 03/08 10:10
4F：→ Jesuscrash:谢谢指教，看样子要改其他方法了Q_Q~ 03/08 16:06
5F：→ awer89:这个问题 你不会是第一个想到 但应该也不会是最後一个 03/08 17:38
6F：推 callmei:电脑没那麽聪明啦~XDD 03/09 00:31