在下面的mathematica程序中添加什么样的语句输出数据Clear[x,y,n,t,a,b,c,d,i];y[1]=0;t=0.1;n=60;Do[x[i]=0+(i-1)*t,{i,1,n+1}]f[x_,y_]=0.1-1.2y;Do[{a=f[x[i],y[i]],b=f[x[i]+t/2,y[i]+t*a/2],c=f[x[i]+t/2,y[i]+t*b/2],d=f[x[i]+t,y[i]+t*c],y[i
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/27 06:08:33
在下面的mathematica程序中添加什么样的语句输出数据Clear[x,y,n,t,a,b,c,d,i];y[1]=0;t=0.1;n=60;Do[x[i]=0+(i-1)*t,{i,1,n+1}]f[x_,y_]=0.1-1.2y;Do[{a=f[x[i],y[i]],b=f[x[i]+t/2,y[i]+t*a/2],c=f[x[i]+t/2,y[i]+t*b/2],d=f[x[i]+t,y[i]+t*c],y[i
在下面的mathematica程序中添加什么样的语句输出数据
Clear[x,y,n,t,a,b,c,d,i];
y[1]=0;t=0.1;n=60;
Do[x[i]=0+(i-1)*t,{i,1,n+1}]
f[x_,y_]=0.1-1.2y;
Do[{a=f[x[i],y[i]],
b=f[x[i]+t/2,y[i]+t*a/2],
c=f[x[i]+t/2,y[i]+t*b/2],
d=f[x[i]+t,y[i]+t*c],
y[i+1]=y[i]+(a+2b+2c+d)*t/6},{i,1,n}]
添加语句使得输出的数据具有这样的形式{x1,y1}{x2,y2}{x3,y3}{x4,y4}{x5,y5}{x6,y6}.
外行一个,
在下面的mathematica程序中添加什么样的语句输出数据Clear[x,y,n,t,a,b,c,d,i];y[1]=0;t=0.1;n=60;Do[x[i]=0+(i-1)*t,{i,1,n+1}]f[x_,y_]=0.1-1.2y;Do[{a=f[x[i],y[i]],b=f[x[i]+t/2,y[i]+t*a/2],c=f[x[i]+t/2,y[i]+t*b/2],d=f[x[i]+t,y[i]+t*c],y[i
啊,不错吗,虽然不推荐这种写法,但是你这个代码已经没有错误了.只要在最后加上这行就可以：
Table[{x[i], y[i]}, {i, n}]