fortran一维数组

wcyyoyo · 发表于 2020-10-19 21:19:28

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

real p(11)，s(10)
integer k
data p/100,150,200,250,300,400,500,700,850,925,1000/
定义了一个一维数组并且赋初值，求后一个减去前一个的差值，并放到数组s(k)中

do k=1,11
s(k)=p(k+1)-p(k)
enddo
这样写关于k的维数会出现问题，怎么解决呢？

lqouc · 发表于 2020-10-20 10:45:02

do k=1,10

wcyyoyo · 发表于 2020-10-20 22:38:32

lqouc 发表于 2020-10-20 10:45
do k=1,10

谢谢你！！！！！！

		自动登录	找回密码
密码			立即注册