查看: 4247|回复: 4

[代码资源] 求解4000x1+3000x2+2000*x3=30000的自然数解程序

[复制链接]

字体大小: 正常放大

mudan

19 主题	2 听众	994 积分

TA的每日心情

	奋斗 2020-3-27 12:01

签到天数: 173 天

[LV.7]常住居民III

群组: 数学建模培训课堂1

群组: 2011年第一期数学建模

群组: 小草的客厅

群组: 科学狂想曲

群组: 学术交流B

电梯直达

1^#

发表于 2012-10-29 16:54 |只看该作者 |倒序浏览

|招呼Ta 关注Ta |邮箱已经成功绑定

for x1=1:13 Q$ F1 n; w% @- Z) C
for x2=1:13
4 v\" R0 g* m( @- r* D, S6 V h
x3=(30000-4000*x1-3000*x2)/2000;; A# u6 L; ~3 C0 o
m=13-x3-x1-x2;. L+ ~3 I% P1 H/ @. n
if sign(x3)>=0 & rem(x3,1)==0 & sign(m)==0
h# c( ?( y: |5 b$ N
disp([x1,x2,x3])
1 _( p6 Y3 J9 ?( J\" |7 x
end$ b( Z+ R% q z) l7 u1 q0 o9 H
end$ q7 ~) P% ?5 U
end

复制代码

zan

已有 1 人评分	体力	收起理由
厚积薄发	+ 9

总评分: 体力 + 9 查看全部评分

3000, 自然数

转播0 淘帖0 分享0 收藏0 支持0 反对0 微信

相关帖子

使用道具举报

madio

3万主题	1312 听众	5万积分

TA的每日心情

	奋斗 2024-7-1 22:21

签到天数: 2014 天

[LV.Master]伴坛终老

自我介绍: 数学中国站长

群组: 数学建模培训课堂1

群组: 数学中国美赛辅助报名

群组: Matlab讨论组

群组: 2013认证赛A题讨论群组

群组: 2013认证赛C题讨论群组

2^#

发表于 2012-10-30 06:38 |只看该作者 |招呼Ta 关注Ta |邮箱已经成功绑定

rem这个函数可以换为mod，容易知道一些！
matlab中的rem()和mod()函数matlab的rem()和mod()函数
rem(x,y):求整除x/y的余数

mod(x,y):求模

rem(x,y)=x-y.*fix(x./y); (fix()向0取整)

mod(x,y)=x-y.*floor(x./y); （floor()向左取整）

如果x和y的符号相同（同为‘+’，同为‘-’），那么rem(x,y)=mod(x,y)（正数与正数，负数与负数，取整结果两个函数效果一样）

如果x和y的符号相反，那么mod(x,y)=rem(x,y)+y(正数与负数的取整，看你希望得到什么结果就选择用什么函数)

当正数与负数取余时，当得到的余数结果的符号希望跟除数(x)一样，用rem()函数；当得到的余数结果的符号希望跟被除数(y)一样，用mod()函数

例如：

rem(3,2)=1;mod(3,2)=1;

rem(-3,-2)=-1;mod(-3,-2)=-1;

rem(3,-2)=1;mod(3,-2)=-1;

rem(-3,2)=-1;mod(-3,2)=1;

mod(3,2)=rem(3,2)=1;

mod(3,-2)=rem(3,-2)-2=1-2=-1;

mod(-3,2)=rem(-3,2)+2=-1+2=1;

点评

mudan 讲的很细致，坛主能不能推荐一本matlab程序实现的书？侧重实例的，谢谢详情回复发表于 2012-10-30 17:43

我也说一句

发表

使用道具举报

mudan

19 主题	2 听众	994 积分

TA的每日心情

	奋斗 2020-3-27 12:01

签到天数: 173 天

[LV.7]常住居民III

群组: 数学建模培训课堂1

群组: 2011年第一期数学建模

群组: 小草的客厅

群组: 科学狂想曲

群组: 学术交流B

3^#

发表于 2012-10-30 17:43 |只看该作者 |招呼Ta 关注Ta |邮箱已经成功绑定

madio 发表于 2012-10-30 06:38
. Z2 f! I! n' Grem这个函数可以换为mod，容易知道一些！4 L% F5 |/ H, y: h" U0 g
matlab中的rem()和mod()函数matlab的rem()和mod()函数
6 m7 k9 Q7 F5 brem(x,y) ...

讲的很细致，坛主能不能推荐一本matlab程序实现的书？侧重实例的，谢谢