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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 计算模拟 » 如何用mathematica8解这一方程的所有整数解？
51/1返回列表
查看: 1233  |  回复: 6
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

shangxj

金虫 (正式写手)

[求助] 如何用mathematica8解这一方程的所有整数解？

如题
方程为0.91x+0.45y+0.75z=70

请大侠不吝相助，并另有奖励奉上。
回复此楼

» 猜你喜欢

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

zhangguangping

木虫 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
shangxj: 金币+10, ★★★很有帮助, 写程序解决问题对我来说有点难度，我还是想使用简单的工具解决相关的一类问题。只是平时杂事颇多，静不下心来深入去学。 2012-06-06 17:53:38
csgt0: 金币+2, 多谢应助 2012-09-19 09:46:09
考虑到你可能不能编译fortran程序，我将fortran程序做成可执行文件了。你只需要下载那个exe按照提示输入你的求解范围，就可以直接将结果输出到文件中去了。

希望对你有用。
赞一下(2人) 回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
    本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com
  • 附件 1 : solv2.f
    • 2012-06-04 22:10:38, 1.6 K
  • 附件 2 : solv2.exe
    • 2012-06-04 22:10:43, 344.03 K
弘德明志博学笃行
5楼2012-06-04 22:10:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

shangxj

金虫 (正式写手)
还没有达人看到吗？
还是根本就无法解？
赞一下 回复此楼
2楼2012-06-04 12:58:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dingd

铁杆木虫 (职业作家)

【答案】应助回帖

★
感谢参与，应助指数 +1
zhangguangping: 金币+1, 谢谢指教！ 2012-06-04 20:37:11
有无穷多组解吧！
有无穷多组解吧！
赞一下 回复此楼
3楼2012-06-04 14:43:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangguangping

木虫 (著名写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
shangxj: 金币+10, ★★★很有帮助, 编程解决问题真是好，谢谢回应。 2012-06-06 17:50:45
虽然你要求用mathematica8解这个方程的整数解。但是我不会mathematica8这个软件。我用Fortran编写了一段小程序，给你解了一下。为了减小计算量，首先解了一下非负整数解如下：
x =    10  y =     2  z =    80
x =    10  y =     7  z =    77
x =    10  y =    12  z =    74
x =    10  y =    17  z =    71
x =    10  y =    22  z =    68
x =    10  y =    27  z =    65
x =    10  y =    32  z =    62
x =    10  y =    37  z =    59
x =    10  y =    42  z =    56
x =    10  y =    47  z =    53
x =    10  y =    52  z =    50
x =    10  y =    57  z =    47
x =    10  y =    62  z =    44
x =    10  y =    67  z =    41
x =    10  y =    72  z =    38
x =    10  y =    77  z =    35
x =    10  y =    82  z =    32
x =    10  y =    87  z =    29
x =    10  y =    92  z =    26
x =    10  y =    97  z =    23
x =    10  y =   102  z =    20
x =    10  y =   107  z =    17
x =    10  y =   112  z =    14
x =    10  y =   117  z =    11
x =    10  y =   122  z =     8
x =    10  y =   127  z =     5
x =    10  y =   132  z =     2
x =    25  y =     0  z =    63
x =    25  y =     5  z =    60
x =    25  y =    10  z =    57
x =    25  y =    15  z =    54
x =    25  y =    20  z =    51
x =    25  y =    25  z =    48
x =    25  y =    30  z =    45
x =    25  y =    35  z =    42
x =    25  y =    40  z =    39
x =    25  y =    45  z =    36
x =    25  y =    50  z =    33
x =    25  y =    55  z =    30
x =    25  y =    60  z =    27
x =    25  y =    65  z =    24
x =    25  y =    70  z =    21
x =    25  y =    75  z =    18
x =    25  y =    80  z =    15
x =    25  y =    85  z =    12
x =    25  y =    90  z =     9
x =    25  y =    95  z =     6
x =    25  y =   100  z =     3
x =    25  y =   105  z =     0
x =    40  y =     3  z =    43
x =    40  y =     8  z =    40
x =    40  y =    13  z =    37
x =    40  y =    18  z =    34
x =    40  y =    23  z =    31
x =    40  y =    28  z =    28
x =    40  y =    33  z =    25
x =    40  y =    38  z =    22
x =    40  y =    43  z =    19
x =    40  y =    48  z =    16
x =    40  y =    53  z =    13
x =    40  y =    58  z =    10
x =    40  y =    63  z =     7
x =    40  y =    68  z =     4
x =    40  y =    73  z =     1
x =    55  y =     1  z =    26
x =    55  y =     6  z =    23
x =    55  y =    11  z =    20
x =    55  y =    16  z =    17
x =    55  y =    21  z =    14
x =    55  y =    26  z =    11
x =    55  y =    31  z =     8
x =    55  y =    36  z =     5
x =    55  y =    41  z =     2
x =    70  y =     4  z =     6
x =    70  y =     9  z =     3
x =    70  y =    14  z =     0

在[-1000,1000]这个区间内的整数就有33177组。估计你的这个问题也是有实际应用的，所以我觉得你肯定是有区间界定的。因此我把我的代码放在这儿，你可以通过调整这个区间的上下线来寻找你想要的结果：

      program sovl
         integer*4 i, j, k
         integer*4 max_x, max_y, max_z
         real*8 resu,EPS
        parameter (EPS=1.d-300)

        max_x=int(70d0/0.91d0)+1
        max_y=int(70d0/0.45d0)+1
          max_z=int(70d0/0.75d0)+1
          open(unit=100,file="solv.dat"
        do i=-1000,1000,1
          do j=-1000,1000,1
                      do k=-1000,1000,1
          resu=(real(i)*0.91d0+real(j)*0.45d0+real(k)*0.75d0)
          if(abs(resu-70d0)           write(*,'(a4,I5,2x,a4,I5,2x,a4,I5)')"x = ",i,"y = ",j,"z = ",k
          write(100,'(a4,I5,2x,a4,I5,2x,a4,I5)')"x = ",i,"y = ",j,"z = ",k
          endif

             enddo
                enddo
             enddo

        end program sovl
赞一下 回复此楼

» 本帖附件资源列表

  • 欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
    本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com
  • 附件 1 : solv2.f
    • 2012-06-04 21:48:57, 631 bytes
弘德明志博学笃行
4楼2012-06-04 21:50:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 315分，诚求调剂，材料与化工085600 +3 13756423260 2026-03-22 3/150 2026-03-22 20:11 by edmund7
[考研] 308求调剂 +3 墨墨漠 2026-03-21 3/150 2026-03-22 16:54 by i_cooler
[考研] 286分人工智能专业请求调剂愿意跨考！ +4 lemonzzn 2026-03-17 8/400 2026-03-21 22:49 by lemonzzn
[考研] 资源与环境 调剂申请(333分) +5 holy J 2026-03-21 5/250 2026-03-21 22:42 by Catalysis25
[考研] 考研调剂 +3 呼呼？~+123456 2026-03-21 3/150 2026-03-21 20:04 by 无际的草原
[考研] 336求调剂 +5 rmc8866 2026-03-21 5/250 2026-03-21 17:24 by 学员8dgXkO
[考研] 299求调剂 +4 某某某某位 2026-03-21 4/200 2026-03-21 16:30 by barlinike
[考研] 材料学学硕080502 337求调剂-一志愿华中科技大学 +4 顺顺顺mr 2026-03-18 5/250 2026-03-21 10:22 by luoyongfeng
[考研] 085601调剂 358分 +3 zzzzggh 2026-03-20 4/200 2026-03-21 10:21 by luoyongfeng
[考研] 265求调剂 +3 Jack?k?y 2026-03-17 3/150 2026-03-21 03:17 by JourneyLucky
[考研] 083200学硕321分一志愿暨南大学求调剂 +3 innocenceF 2026-03-17 3/150 2026-03-21 02:35 by JourneyLucky
[考研] 初始318分求调剂（有工作经验） +3 1911236844 2026-03-17 3/150 2026-03-21 02:33 by JourneyLucky
[考研] 华东师范大学-071000生物学-293分-求调剂 +3 研究生何瑶明 2026-03-18 3/150 2026-03-21 01:30 by JourneyLucky
[考研] 296求调剂 +6 www_q 2026-03-18 10/500 2026-03-20 23:56 by JourneyLucky
[考研] 085410人工智能专硕317求调剂（0854都可以） +4 xbxudjdn 2026-03-18 4/200 2026-03-20 09:07 by 不168
[论文投稿] 申请回稿延期一个月，编辑同意了。但系统上的时间没变，给编辑又写邮件了，没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 288求调剂，一志愿华南理工大学071005 +5 ioodiiij 2026-03-17 5/250 2026-03-19 18:22 by zcl123
[考研] 085600材料与化工调剂 324分 +10 llllkkkhh 2026-03-18 12/600 2026-03-19 14:33 by llllkkkhh
[考研] 085600材料与化工求调剂 +6 绪幸与子 2026-03-17 6/300 2026-03-19 13:27 by houyaoxu
[考研] 312求调剂 +8 陌宸希 2026-03-16 9/450 2026-03-18 12:39 by Linda Hu
信息提示
关闭
请填处理意见
关闭