拖动LOGO至书签栏，立即收藏蜗牛文库
Mathematica程序由图象求Cos[Cos[...[Cos[x]]]]的极限x=Input["输入起始值",0.935];y={{x,0}};For[i=1,i<50,i++,y=Append[y,{x,Cos[x]}];y=...
Mathematica程序计算两线段之间的最短距离(*输入四个点坐标*)(*将坐标输成7/2形式可以得到准确解,输成3.5只能得到有一定精确度的数值解.*)(...
Mathematica程序汉诺塔游戏的解法演示汉诺塔游戏是一个很久远的故事了，相传只要将64个大小不等的圆环从第一个的竖立的杆上取下来，套在另...
Mathematica程序画贝塞尔bessel曲线(*输入数据可以有两种输入方式:arr={{x1,y1},{x2,y2},...,{xn,yn}},或者arr={x1,y1,x2,y2,...,xn,yn}或...
Mathematica程序中国剩余定理-物不知其数(*自然数x除以{m}余{n},则x最小值是多少?*)arraym1={};arraym2={};arrayn1={};chengji=1;guocheng=...
派车线性规划问题北京2008奥运期间，由清华大学480名学生组成的北京2008奥运志愿者队伍要前往国家体育场（“鸟巢”）进行志愿活动。清华大...
Mathematica程序计算物体由静止开始从传送带上往下滑所用时间(*物体从传送带上往下滑*)(*传送带长度L,高度H,倾角\[Theta],滑动摩擦因数\[Mu...
Mathematica程序刹车后车滑行的位移(*刹车过程中,车的初速度为V0,加速度为a,经历了t时间后,位移s是多少?*)v0=Input["输入刹车时的初速度v0,...
Mathematica程序计算中垂线坐标x1=Input["输入横坐标x1:",5];y1=Input["输入纵坐标y1:",3];x2=Input["输入横坐标x2:",4];y2=Input["输入纵...
Mathematica程序碰撞演示(*下面是二维情况*)(*输入部分*)(*起始位置*)weizhi2D={.5,.3};(*框架长*)kuangjia2D={7,6.4};(*最大速度*)sudu2D=...
