应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 数学 » 工科数学 » 求助解方程！！
51/1返回列表
查看: 1619  |  回复: 11
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

hedge

银虫 (小有名气)

[求助] 求助解方程！！

本人碰到一个数学难题！200金币！！初步考虑了一下，应是一个X的n+1次的方程！！

11.png
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2012-09-22 10:28:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

用编程模式，再大的n都没问题（如果有解的话）
CODE:
Constant n=20, A0=1, B0=1, C=10; //n>4
ConstStr A1=1+x, B1=2+x;
Parameter x;
StartProgram [Pascal];
Procedure MainModel;
var i: integer;
    A, B: array of double;
Begin
    setlength(A, n+2);
    setlength(B, n);
    for i := 2 to n + 1 do begin
        if i = 2 then A[i]:=(i+x)*A1-A0
        else if i = 3 then A[i]:=(i+x)*A[2]-A1
        else A[i]:=(i+x)*A[i-1]-A[i-2];
    end;
    for i := 3 to n do begin
        if i = 3 then B[i-1]:=(i+x)*B1-B0
        else if i = 4 then B[i-1]:=(i+x)*B[2]-B1
        else B[i-1]:=(i+x)*B[i-2]-B[i-3];
    end;
    ObjectiveResult := sqr(A[n+1]-B[n-1]-C);
End;
EndProgram;

x: -10.9999999999994
赞一下(1人) 回复此楼
5楼2012-09-24 18:37:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

感谢参与，应助指数 +1
用1stOpt试了下，不知对否，参考下：
假设C=10，n取8
CODE:
Constant n=8, A0=1, B0=1, C=10; //n>4
ConstStr A1=1+x, B1=2+x;
ConstStr For(i=2:n+1)(A[i]=(i+x)*A[i-1]-A[i-2]),
         For(i=3:n)(B[i-1]=(i+x)*B[i-2]-B[i-3]);
Function A[n+1]-B[n-1]=C;

函数表达式 (((9+x)*(((8+x)*(((7+x)*(((6+x)*(((5+x)*(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2+x)*((1+x))
            -1))))-(((3+x)*(((2+x)*((1+x))-1))-((1+x))))))-(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2+x)
            *((1+x))-1))))))-(((5+x)*(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2+x)*((1+x))-1))))-(((3+x)
            *(((2+x)*((1+x))-1))-((1+x))))))))-(((6+x)*(((5+x)*(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2
            +x)*((1+x))-1))))-(((3+x)*(((2+x)*((1+x))-1))-((1+x))))))-(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))
            -(((2+x)*((1+x))-1))))))))-(((7+x)*(((6+x)*(((5+x)*(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2
            +x)*((1+x))-1))))-(((3+x)*(((2+x)*((1+x))-1))-((1+x))))))-(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))
            -(((2+x)*((1+x))-1))))))-(((5+x)*(((4+x)*(((3+x)*(((2+x)*((1+x))-1))-((1+x))))-(((2+x)*((1+x))-1))))
            -(((3+x)*(((2+x)*((1+x))-1))-((1+x))))))))))-(((8+x)*(((7+x)*(((6+x)*(((5+x)*(((4+x)*(((3+x)*((2+x))
            -1))-((2+x))))-(((3+x)*((2+x))-1))))-(((4+x)*(((3+x)*((2+x))-1))-((2+x))))))-(((5+x)*(((4+x)*(((3+x)
            *((2+x))-1))-((2+x))))-(((3+x)*((2+x))-1))))))-(((6+x)*(((5+x)*(((4+x)*(((3+x)*((2+x))-1))-((2+x))))
            -(((3+x)*((2+x))-1))))-(((4+x)*(((3+x)*((2+x))-1))-((2+x))))))))-(10) = 5.684341886E-013
目标函数值(最小): 3.23117426778526E-25
x: -4.00073291639669

有多组解：
x: -0.18247902078968

x: -4.99044771453577

x: -6.01381051142547

jv2.JPG
赞一下 回复此楼
2楼2012-09-22 20:56:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

meteor1245

金虫 (正式写手)

一饭之恩必偿，睚眦之怨必报
不是一般的复杂啊。好难
赞一下 回复此楼
这个世界上重要的不是你站在什么位置，而是你正向着什么方向移动！
3楼2012-09-23 00:22:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hedge

银虫 (小有名气)
引用回帖:
2楼: Originally posted by dingd at 2012-09-22 20:56:26
用1stOpt试了下，不知对否，参考下：
假设C=10，n取8

Constant n=8, A0=1, B0=1, C=10; //n>4
ConstStr A1=1+x, B1=2+x;
ConstStr For(i=2:n+1)(A=(i+x)*A-A),
         For(i=3:n)(B=(i+x)*B-B);
Funct ...

谢谢您的回复。理论上讲可以这么做。
但是当N比较大的时候可能就没有办法了！
我想得另想他途。
为了感谢您，以50金币为感谢！！
请管理员帮忙代发！！
赞一下 回复此楼
4楼2012-09-24 10:34:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 8/400 2026-08-23 00:28 by OEbVnUOu01ol
[论文投稿] 售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急 +3 QTy3jDtz1uLt 2026-08-21 8/400 2026-08-22 23:51 by OEbVnUOu01ol
[硕博家园] 售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急 +4 QTy3jDtz1uLt 2026-08-21 10/500 2026-08-22 23:42 by OEbVnUOu01ol
[基金申请] 2026国自然函评费到账 +11 羊腰板 2026-08-21 11/550 2026-08-22 22:03 by lsbin3733
[硕博家园] 售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急 +3 2JOx3r2CYEgw 2026-08-22 3/150 2026-08-22 22:03 by OEbVnUOu01ol
[基金申请] 什么时候开奖？ +7 CrisMessi 2026-08-18 8/400 2026-08-22 18:29 by 淀粉搬运工
[基金申请] 只有每年这种时候来逛逛小木虫 +24 yaoyewhu2008 2026-08-20 26/1300 2026-08-22 17:43 by kammury
[基金申请] filecode，4个jtjc了 +13 ziyangfang 2026-08-19 16/800 2026-08-22 17:08 by WH3796
[教师之家] 售一区SCI文章T0P，我:8O.551.O54,科目全,可十急 +4 2JOx3r2CYEgw 2026-08-21 4/200 2026-08-22 16:52 by sunzitan
[基金申请] 人气不行了 +8 fansofjerry 2026-08-21 8/400 2026-08-22 16:30 by zyqchem
[基金申请] 今天基金会出结果吗？20260819 +16 kkkl_v 2026-08-19 17/850 2026-08-22 16:12 by 阿布Abu
[基金申请] 放榜前的不淡定 40+4 snowwithsea 2026-08-19 14/700 2026-08-21 23:51 by cratir
[基金申请] 建议基金发布提前给出明确的时间点 +10 kulium 2026-08-21 13/650 2026-08-21 21:58 by alongwaytogo
[基金申请] 今天放榜没戏了吧 +9 yuleib84 2026-08-19 11/550 2026-08-21 10:06 by gltch
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 今天系统多次维护，明天很可能放榜！ +10 zju2000 2026-08-16 11/550 2026-08-20 20:02 by cl479861084
[基金申请] 重要消息，中午系统在维护 +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[基金申请] 今天放榜吗？ +14 布布和一二 2026-08-19 15/750 2026-08-19 18:07 by gltch
[基金申请] 明天放榜？ +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
关闭
请填处理意见
关闭