Question

求助~fortran程序编译有错误！

有一分数序列：2/1，3/2，5/3，8/5，13/8，21/13...求出这个数列的前20项之和。
我写的是
real x,y,s,t
read *,
x=2
y=1
s=0
do i=1,20
s=s+x/y
t=x
x=x+y
y=t
end do
print *,s
end
D:\Program Files (x86)\Fortran\Projects\123\Text1.f90(2): error FOR3852: syntax error
Error executing fl32.exe.
Text1.obj - 1 error(s), 0 warning(s)

另外read后面只能读取一个？我把xys的赋值放在一行写，就说有2个错误= =
求帮助！

Answer 1

real x,y,s,t
x=2
y=1
s=0
do i=1,20
s=s+x/y
t=x
x=x+y
y=t
end do
print *,s
end
这样写就对了
结果是 s=32.66026

Answer 2

real x,y,s
x=2
y=1
s=0
do i=1,20
s=s+x/y
t=x
x=x+y
y=t
end do
print *,s
end
你这样再试试。。

Answer 3

把read*，那行去掉应该就可以了