5).Mathematica中如何对离散点作积分？
离散的点通过插值或者拟合就可以得到连续的函数，然后可以对该函数求积分和微分。下面是一个例子：
f[x_] := NIntegrate[Sin[Cos[x]], {x, 0, a}]; data = Table[{a, f[x]}, {a, 0, 10}]; expr = Interpolation[data];
Plot[expr[a], {a, 0, 10}];
Plot[Evaluate[D[expr[a], a]], {a, 0, 10}]
如果想实现Matlab中的cumsum的功能： Drop[FoldList[Plus, 0, {a1,a2,?,an}], 1]
=================================== 6).在Mathematica中创立palette？
在帮助中查找\
=================================== 7).Mathematica可以作用户界面吗?
Mathematica的GUI设计是通过它的交互式的NoteBook实现的，可以参考Mathematica帮助文件中的demo例子，或参考帮助2.10.6
=================================== 8).Mathematica中如何使用中文?
Mathematica3/4/4.1中如果使用中文，需要先选中所在的cell，或者选中输入的中文乱码，在菜单format font中选中对应的中文字体后才能正确显示。 最新的4.2在国际化有较大的改进，可以直接输入中文，参见
http://www.wolfram.com/products/mathematica/newin42/publishing.html
===================================
9).Mathematica中如何使用Solve[]求解的结果？
Solve[]求解的结果是以一个\表\或者\替换规则\的形式给出来的，并没有把结果真正替换给未知量。如果
sol = Solve[a*x^2 + b*x + c == 0, x]; x=x /. sol[[1]]
也可以使用对表元素的操作把结果取出来，比如在上面的例子中：
x1=sol[[1,1,2]] x2=sol[[2,1,2]]