1个回答
展开全部
第一题
m=-1;
x(1)=3;
x(2)=(x(1)+m/x(1))/2;
i=2;
while abs(x(i)-x(i-1))>1e-6&i<10000
i=i+1;
x(i)=(x(i-1)+m/x(i-1))/2;
end
if abs(x(i)-x(i-1))<1e-6
plot(x)
disp(['收敛,',num2str(x(i))])
elseif abs(x(i)-x(i-1))>1e-6
plot(x)
disp(['不收敛,'])
end
m=-1计算结果 不收敛 而m=1时计算结果收敛
第二题
p=7;
i=2;
a(1)=1;
a(2)=1/(2^p);
x(1)=1;
x(2)=1+1/(2^p);
while abs(x(i)-x(i-1))>1e-17&i<100000
i=i+1;a(i)=1/(i^p);
x(i)=sum(a);
end
if abs(x(i)-x(i-1))<1e-17
plot(x)
disp(['收敛,'])
s=vpa(x(i),17)
elseif abs(x(i)-x(i-1))>1e-17
plot(x)
disp(['不收敛,'])
end
收敛,
s =
1.0083492773819207
>>
m=-1;
x(1)=3;
x(2)=(x(1)+m/x(1))/2;
i=2;
while abs(x(i)-x(i-1))>1e-6&i<10000
i=i+1;
x(i)=(x(i-1)+m/x(i-1))/2;
end
if abs(x(i)-x(i-1))<1e-6
plot(x)
disp(['收敛,',num2str(x(i))])
elseif abs(x(i)-x(i-1))>1e-6
plot(x)
disp(['不收敛,'])
end
m=-1计算结果 不收敛 而m=1时计算结果收敛
第二题
p=7;
i=2;
a(1)=1;
a(2)=1/(2^p);
x(1)=1;
x(2)=1+1/(2^p);
while abs(x(i)-x(i-1))>1e-17&i<100000
i=i+1;a(i)=1/(i^p);
x(i)=sum(a);
end
if abs(x(i)-x(i-1))<1e-17
plot(x)
disp(['收敛,'])
s=vpa(x(i),17)
elseif abs(x(i)-x(i-1))>1e-17
plot(x)
disp(['不收敛,'])
end
收敛,
s =
1.0083492773819207
>>
富港检测技术(东莞)有限公司_
2024-06-06 广告
2024-06-06 广告
ISTA3L是一个基于研究、数据驱动的测试协议,它模拟了由零售公司完成的产品订单被直接运送给消费者时所经历的危险,它允许用户评估包装产品的能力,以承受运输和处理包装产品时所经历的供应链危险,从接收到任何电子商务零售商履行操作,直到最终消费者...
点击进入详情页
本回答由富港检测技术(东莞)有限公司_提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询