如何用mathematica做数学题

A. 如何用Mathematica软件完成如下数学题目

Clear[v, k, t];
a = 1;
b = 0.1;
sol = NDSolve[{v'[t] == k[t]*v[t]^a, k'[t] == -k[t]*b,
v[0] == k[0] == 1}, {v, k}, {t, 200}]
Plot[Evaluate[v[t] /. %], {t, 0, 200}]
Clear[v, k, t];
a = 2/3;
b = 0.1;
sol = NDSolve[{v'[t] == k[t]*v[t]^a, k'[t] == -k[t]*b,
v[0] == k[0] == 1}, {v, k}, {t, 200}]
Plot[Evaluate[v[t] /. %], {t, 0, 200}]

老公加油！

B. 用Mathematica语言解题

h = 32/a/b;
z = 50 a b + 40 2 (a + b) h;
Minimize[{z, a > 0 && b > 0}, {a, b}, Reals] // RootRece
Plot3D[z, {a, 0.3, 16}, {b, 0.3, 16}]

C. 用mathematica软件， 求解三角函数方程组。

(1)因为你根本不会用mathematica软件，当然求不出解了。你的代码就写错了，函数调用的时候是写方括号，不是小括号。
(2)
其次，当你要求求解一个方程的时候，你应该指定未知数，比如你解一个含有x的方程，那么最终的结果不应该含有x。你既然指定了x,y是未知数，那么最终的解的结果应该是x,y是不含有x和y。你给的解xy=Pi/2，先不说解是错误的，就从数学上来说，这也是不对的，解含有x,y的方程，给出的解应该是单独的解，xy=Pi/2是一条曲线，不是一个单独的解。能够给出解是一条曲线的，那个叫微分方程，微分方程它的自变量是函数。
(3)
用mathematica的时候，应该和以前学过的数学知识结合起来。你求解的是一个方程组，那么以前老师讲过，方程组可能会误解。如果问题本身无解，软件没有义务告诉你为何无解。方程组还有一种情况，叫做同解方程，就是说有的方程是多余的，比如你的这个例子就是，如果发现同解方程，应该去掉。
正确的解法
Solve[{Cos [x y] == 1, Sin [x y] == 0}, x]
解出
{{x -> 0}} 这个解告诉你y是一个自由变量。
(4)
mathematica帮助你计算，但是不能够代替你的思考。

D. 如何用Mathematica做出一个图像验证数学题的答案

如下图所示，希望有所帮助！

E. 怎么用mathematica的数学工具

曾经很喜欢折腾，至少用过有40多个数学软件，包括几乎所有出名的和一些不出名的，大型的中型的。其中3M（Matlab、Mathematica、Maple）用的较多，一些浅见：Matlab线性代数和数值计算方面优势显着，向量化运算往往比同类软件更快，拥有超多工具箱，仿真，图像处理，信号处理，金融，统计，优化程序语言比较易学，编辑和调试环境不错方便构建GUI不是原生支持符号计算（符号计算远不止是推导公式），新版的mupad内核还不错，但是和Mathematica、Maple比有明显差距，不论是深度、广度和速度递归特别慢，比Mathematica和Maple以及常见的脚本语言都慢在一些数学领域相对薄弱，如数论，图论，离散数学等高精度和大数计算比较慢(如精确计算100万的阶乘或π的前500万位)工具箱之间的协作能力不是很好界面不太好看(新版R2013a的Ribbon界面不错)缺省画图不美观，锯齿，系统函数命名不够规范Mathematica符号计算非常强大，可解的方程类型最广泛非常强大和灵活的语言，完成相同的工作，和同类语言相比代码量往往最少语言高度统一，支持相当多的编程范式，过程式、函数式、元编程，逻辑编程、基于规则循环比较慢，可以用Compile加速，或使用Map、Table、Nest等代替循环许多内置函数具备AAS机制(AutomaticAlgorithmSelection)擅长高精度和大数计算，图形方面的函数很丰富，默认画图比Matlab和Maple更好看界面美观，输入公式很方便帮助文档很友好价格较高，比matlab更贵(Matlab的价格取决于你要哪些工具箱)向量化的操作比Matlab稍慢，有时比Matlab更耗内存代码调试不是很方便，但可以用WolframWorkbench（基于Eclipse的IDE）改善程序语言学习曲线陡峭，排除熟悉Scheme、Haskell等函数式语言或者作为高级计算器使用的人（Mathematica的语法和常见的过程式程序语言有较大不同，虽然也可以作为过程式语言来用，但代码的和速度和优雅程度就大打折扣了）Maple：符号计算非常强大，和Mathematica相比各有千秋许多多项式操作比Mathematica更快一些符号积分Maple也有速度优势（特别是不定积分），不过有时返回的结果没有Mathematica给出的更严谨、鲁棒性好，能算的积分类型没有Mathematica多Maple的“适应性”更好，有的问题Mathematica需要一定的预处理才能算的更快，得出满意的结果Maple更擅长(偏)微分方程，(其实Maple和Mathematica都能解一些对方解不了的一些特殊微分方程)可以带步骤求解一些问题，Mathematica需要第三方的Package或借助WolframAlpha上手较快，一些常见的操作无需命令，通过右键菜单就能完成界面有点卡(基于Javaswing)，经典界面流畅但是很土自带的代数方面的package比较丰富化简能力，不等式求解，逻辑系统较Mathematica逊色一些数值计算总体上比Matlab和Mathematica差一些高精度和大数计算方面强于Matlab弱于Mathematica统计方面有些薄弱

F. 用mathematica求解数学题！！紧急悬赏！！

三年前的问题……我干嘛还要来答哟……而且这题面不清啊，分母上的那个，是相乘还是两数连接呢？如果是相乘的话：
Select[Permutations@Range@9, Apply[(#1)/((#2) (#3)) + (#4)/((#5) (#6)) + (#7)/((#8) (#9)) &, #] == 1 &]

得到满足条件的解有：
{{1, 3, 6, 5, 8, 9, 7, 2, 4}, {1, 3, 6, 5, 8, 9, 7, 4, 2}, {1, 3, 6, 5, 9, 8, 7, 2, 4}, {1, 3, 6, 5, 9, 8, 7, 4, 2}, {1, 3, 6, 7, 2, 4, 5, 8, 9}, {1, 3, 6, 7, 2, 4, 5, 9, 8}, {1, 3, 6, 7, 4, 2, 5, 8, 9}, {1, 3, 6, 7, 4, 2, 5, 9, 8}, {1, 6, 3, 5, 8, 9, 7, 2, 4}, {1, 6, 3, 5, 8, 9, 7, 4, 2}, {1, 6, 3, 5, 9, 8, 7, 2, 4}, {1, 6, 3, 5, 9, 8, 7, 4, 2}, {1, 6, 3, 7, 2, 4, 5, 8, 9}, {1, 6, 3, 7, 2, 4, 5, 9, 8}, {1, 6, 3, 7, 4, 2, 5, 8, 9}, {1, 6, 3, 7, 4, 2, 5, 9, 8}, {5, 8,9, 1, 3, 6, 7, 2, 4}, {5, 8, 9, 1, 3, 6, 7, 4, 2}, {5, 8, 9, 1, 6, 3, 7, 2, 4}, {5, 8, 9, 1, 6, 3, 7, 4, 2}, {5, 8, 9, 7, 2, 4, 1, 3, 6}, {5, 8, 9, 7, 2, 4, 1, 6, 3}, {5, 8, 9, 7, 4, 2, 1, 3, 6}, {5, 8, 9, 7, 4, 2, 1, 6, 3}, {5, 9, 8, 1, 3, 6, 7, 2, 4}, {5, 9, 8, 1, 3, 6, 7, 4, 2}, {5, 9, 8, 1, 6, 3, 7, 2, 4}, {5, 9, 8, 1, 6, 3, 7, 4, 2}, {5, 9, 8, 7, 2, 4, 1, 3, 6}, {5, 9, 8, 7, 2, 4, 1, 6, 3}, {5, 9, 8, 7, 4, 2, 1, 3, 6}, {5, 9, 8, 7, 4, 2, 1, 6, 3}, {7, 2, 4, 1, 3, 6, 5, 8, 9}, {7, 2, 4, 1, 3, 6, 5, 9, 8}, {7, 2, 4, 1, 6, 3, 5, 8, 9}, {7, 2, 4, 1, 6, 3, 5, 9, 8}, {7, 2, 4, 5, 8, 9, 1, 3, 6}, {7, 2, 4, 5, 8, 9, 1, 6, 3}, {7, 2, 4, 5, 9, 8, 1, 3, 6}, {7, 2, 4, 5, 9, 8, 1, 6, 3}, {7, 4, 2, 1, 3, 6, 5, 8, 9}, {7, 4, 2, 1, 3, 6, 5, 9,
8}, {7, 4, 2, 1, 6, 3, 5, 8, 9}, {7, 4, 2, 1, 6, 3, 5, 9, 8}, {7, 4, 2, 5, 8, 9, 1, 3, 6}, {7, 4, 2, 5, 8, 9, 1, 6, 3}, {7, 4, 2, 5, 9, 8, 1, 3, 6}, {7, 4, 2, 5, 9, 8, 1, 6, 3}}

如果是连接的话：
Select[Partition[#, 3] & /@ Permutations@Range@9,
Total@Apply[(#1)/ToExpression[10 #2 + #3] &, #, {1}] == 1 &]
得到满足条件的解有：
{{{5, 3, 4}, {7, 6, 8}, {9, 1, 2}},
{{5, 3, 4}, {9, 1, 2}, {7, 6, 8}},
{{7, 6, 8}, {5, 3, 4}, {9, 1, 2}},
{{7, 6, 8}, {9, 1, 2}, {5, 3, 4}},
{{9, 1, 2}, {5, 3, 4}, {7, 6, 8}},
{{9, 1, 2}, {7, 6, 8}, {5, 3, 4}}}

G. 如何用Mathematica计算积分

1,
定积分的求解主要命令是Integrate[f,{x,min,max}]， 或者使用工具栏输入也可以。例如求
In[6]:=Integrate[x^2Exp[ax],{x,-4,4}].
这条命令也可以求广义积分.
例如求
In[7]:=Integrate[1/(x-2)^2,{x,0,4}]

求无穷积也可以，例如
In[8]:=Integrate[1/x^4,{x,1,Infinity}]

如果广义积分发散也能给出结果，例如：
In[9]:=Integrate[1/x^2,{x,-1,1}]

如果无法判定敛散性，就用给出一个提示.

2,
数值积分是解决求定积分的另一种有效的方法，它可以给出一个近似解。特别是对于用Integrate命令无法求出的定积分，数值积分更是可以发挥巨大作用。
它的命令格式为：
Nintegrate[f,{x,a,b}] 在[a,b]上求f数值积分
3, 除了上述简单情形外, Integrate可以还可以求不定积分, 二重积分,三重积分. 具体参见其帮助文件.

H. 用Mathematica怎么解决这个问题

直接求解的指令是没有的，但是可以用mathematica做辅助分析。
首先，显然这个式子的分子在x->2时是趋于0的，那么，要满足条件，就要分子在x->2时也趋于0，那么：
getb = Solve[((x^2 + a x + b) /. x -> 2) == 0, {b}]

得到：
{{b -> -2 (2 + a)}}

我们把所得的式子带入原式并因式分解：
fm = Factor[x^2 + a x + b /. getb]

得到：
{(-2 + x) (2 + a + x)}

其实至此，已经可以一眼看出这里的解了，但是我们可以依旧可以让软件帮我们帮它解出来：
geta = Solve[Limit[(x^2 - x - 2)/fm, x -> 2] == 2, {a}]

得到：
{{a -> -(5/2)}}

要算出b的值则用：
b /. getb /. geta

得到：
{{1}}

并不是什么数学问题mathematica都有内建指令，它毕竟还是个编程语言，很多时候，动用我们的聪明才智也是必要的。

I. mathematica数学试验

是不是就是要用Wolfram Mathematica 做一些有关"一元微积分的应用"的题目啊？

比如：
将边长为10cm的铁片折成一个无盖的，底面是正方形的长方体，请问：
高为何值时，该长方体的容积最大？可用Mathematica 解答如下：

采纳后可以继续讨论

J. 如何使用mathematica

Mathematica
>01
打开Mathematica，输入“Integrate[(Cos[x]^2 - Sin[x])/Cos[x]/(1 + Cos[x] E^Sin[x]), x]”，注意不包含双引号，英文状态下输入。
按Shift+Enter就可以得到结果了。点击“更多”还会有其它诸如绘图、求极值等功能。
共2图>02
如果你觉得输入“Integrate[(Cos[x]^2 - Sin[x])/Cos[x]/(1 + Cos[x] E^Sin[x]), x]”显得不直观，没关系，符号是Mathematica最擅长的！
打开“数学助手”,图中标出的一个为不定积分，另一个为定积分。
>03
从“数学助手”面板中选择需要的符号组成直观的表达式，然后Shift+Enter，结果秒出！