PTVenn 发表于 2016-9-1 16:32:20

关于读real型数据时读到一个非法字符

本帖最后由 PTVenn 于 2016-9-1 16:32 编辑

使用梯形法求解f(x)在上的定积分,f(x)=1/(1+x)。为了求得图形面积,先将区间分成n等分,每个区间的宽度为h=(b-a)/n,对应将图形分成n等分,再分别求小曲边梯形的面积并累加得到积分面积。
代码如下:
real a,b,h,x,s,f0,f1,si
integer n,i
read *,a,b,n
h=(b-a)/n
x=a;s=0;f0=1.0/(1+x)
do i=1,n
   x=x+h
   f1=1.0/(1+x)
   si=(f0+f1)*h/2
   s=s+si
   f0=f1
end do
print *,s
end


运行结果如图,求解哪个是非法字符啊:'(

li913 发表于 2016-9-1 16:34:42

本帖最后由 li913 于 2016-9-1 16:36 编辑

请用半角逗号。另外建议更换主流编译器,你这个太老。

PTVenn 发表于 2016-9-1 16:41:30

li913 发表于 2016-9-1 16:34
请用半角逗号。另外建议更换主流编译器,你这个太老。

原来如此哈哈,非常感谢!一时忘记了!
页: [1]
查看完整版本: 关于读real型数据时读到一个非法字符