Question

我是一个FORTRAN新手，请问下高手，在编程中，一个自加公式不知如何用什么语句实现，谢谢

希望能完善点

Answer 1

先就公式本身的组成来讨论fortran的语句，首先有求和，很容易，用一个循环就解决了，就是for i。。。。。。什么的，然后有微分，这在fortran里面没有对应函数，所有的计算机语言都是要把函数离散化来求微分，然后用公式f((x+i)-f(x))/i,i趋于无限小，在计算机里面把i取得很小就行，一般的误差都很小（二元函数其实也差不多），解决了这两个问题，其它的就简单了。

追问

？？？FORTRAN里还能用FOR循环

追答

一时贪快写错了，不好意思，是do i=。。。。。
见谅

Answer 2

假设n=10
w(x,y)=x+y
先定义一个函数
function w(x,y)
implicit none
real w,x,y
w=x+y
end function w

program adddd
implicit none
real f
integer n,i
real w(10),y(10),d(10)
n=10
y(1)=1.
y(2)=...
...
y(10)=...
d(1)=...
...
d(10)=...
f=0.
do i=2,n
f=f+(w(x,y(i))+w(x,y(i-1)))*d(i)
end do
print*,f