mathematica建模学习系列1

所练习的函数
Solve/NSolve/Reduce（解方程）/Roots/Plot+FindRoot(图像+估计找根)/
Eliminate(消元)/Limit/ListPlot(绘制点集)/Table(制表)/Direction左右极限/Dt和D/Table+D(输出多个n阶导数)/Integrate(包括重积分)/NIntegrate/Sum(求和函数)/Series(级数展开)

Solve和Eliminate在化简消元的区别：Solve最后是要留什么，Eliminate是要去掉什么

（1）荡杯问题

《孙子算经》中，卷下第十七问，有一个著名的“荡杯问题”，曰：“今有妇人河上荡杯。津吏问曰：‘杯何以多？’妇人曰：‘有客。’津吏曰：‘客几何？’妇人曰：‘二人共饭，三人共羹，四人共肉，凡用杯六十五。不知客几何？”这里说的故事是一个妇人在河里荡杯（洗涤杯碗），掌管桥梁的官吏（津吏）就问她为何要洗这么多杯碗，来了多少客人？妇人就回答，两个人共用一个饭碗，三个人共用一个汤碗，四个人共用一个肉碗，一共用了六十五个碗，你说来了多少客人？（提示：一元方程的建模）

Reduce[x/2+x/3+x/465,x]
x60

（2）凑零为整

手边有标准的货币1元、5元、10元，如何支付19元？有多少种方式可以实现支付？（提示：多元方程的建模）

Reduce[x+5y+10z==19&&x>=0&&y>=0&&z>=0,Element[{x,y,z},Integers]]

(x4&&y1&&z1)||(x4&&y3&&z0)||(x9&&y0&&z1)||(x9&&y2&&z0)||(x14&&y1&&z0)||(x19&&y0&&z0)

（3）“鸡兔同笼”的问题

在《孙子算经》中，有一个著名的“鸡兔同笼”问题，曰：“今有雉、兔同笼，上有三十五头，下有九十四足。问：雉、兔各几何？”给出的答案是：“雉二十三，兔一十二。”计算的方法是，术曰：“上置三十五头，下置九十四足。半其足，得四十七，以少减多，再命之，上三除下三，上五除下五，下有一除上一，下有二除上二，即得。又术曰：上置头，下置足，半其足，以头除足，以足除头，即得。”这一段文字，比较晦涩难懂，如果我们用方程组来求解，在Mathematica中，只用写一条语句，即可得到答案。请思考求解。（提示：建立联立方程组求解）

Reduce[{x+y2,2x+4y94},{x,y}]
x==-43&&y==45

（4）“韩信点兵”的问题

在历史上，流传有一个韩信点兵的典故，是说大将韩信有次带兵打仗，出征有1500名士兵，战死大约有四五百人，战后清点人数，韩信用的方法是，让士兵站成队列，就得到总人数。3人站一排，多出2人；5人站一排，多出4人；7人站一排，多出6人；韩信很快就知道现有士兵总数是1049人。韩信是怎么计算的呢？这里要用到一些数学知识。但是在Mathematica中，同样可以用很简便方法的方法求解“韩信点兵”。请思考求解。（提示：建立联立方程组求解）

Solve[{3x+2s,5y+4s,7z+6==s,s<=1100,s>1000},{x,y,z,s},PositiveIntegers]

{{x->349,y->209,z->149,s->1049}}