四人追逐问题及C程序.doc

1 追逐问题 1.1问题 四个人甲、乙、丙、丁分别位于边长为10米的正方形ABCD的四个顶点处。在某一时刻，四人同时出发以匀速v按顺时针方向跑向下一个人。在进行过程中，如果他们始终保持对准目标，问他们的追逐路线是怎样的？试用计算机画出追逐过程中每个人的行进轨迹。 1.2符号说明： ：追逐的时间，单位为秒 ：开始追逐的时间，单位为秒 ：终止追逐的时间，单位为秒 ：甲在时刻处于的坐标位置 ：乙在时刻处于的坐标位置 ：丙在时刻处于的坐标位置 ：丁在时刻处于的坐标位置 1.3问题的分析与求解： 建立如图坐标系，则由甲在时刻处于的坐标位置为、乙在时刻处于的坐标位置为、丙在时刻处于的坐标位置为、丁在时刻处于的坐标位置为。为了求每个人的行进轨迹，考虑追逐在发生较小时间间隔情况下，每个人的变化位置。先考虑甲追乙的情况：在时刻，甲的坐标为，乙的坐标为，则甲乙之间的距离，按题意，甲乙位置坐标的连线确定了甲的追逐方向， 显然有 当追逐又延续了时间间隔后，假设时间间隔较小，甲的坐标变为 类似的，有在时刻由变到时，乙的坐标变为： 、 丙的坐标变为： 、 丁的坐标变为： 、 设开始追逐的时间，将整个追逐时间分为等分，每一个时间采样间隔为，这样我们可以在每个追逐的时间进行后利用如上公式计算出每个人位置变化的坐标，然后用小直线段分别连接每个人的位置坐标，画出相应的图形就可以看到追逐路线。 用zuobiao来存储甲、乙、丙、丁在追逐过程中的坐标序列： 程序如下： tn=Input[追逐终止时间tn=] dt=Input[时间间隔dt=] v=Input[追逐速度v=] n=tn/dt zuobiao={{{0,0}},{{0,10}},{{10,10}},{{10,0}}}; For[j=1,j?n,j++, For[i=1,i?4,i++, xx1=zuobiao[[i,j,1]]; yy1=zuobiao[[i,j,2]]; If[i?4,xx2=zuobiao[[i+1,j,1]];yy2=zuobiao[[i+1,j,2]], xx2=zuobiao[[1,j,1]]; yy2=zuobiao[[1,j,2]]]; dd=Sqrt[(xx2-xx1)^2+(yy2-yy1)^2]//N; xx1=xx1+v*dt*(xx2-xx1)/dd; yy1=yy1+v*dt*(yy2-yy1)/dd; zuobiao[[i]]=Append[zuobiao[[i]],{xx1,yy1}]]]; g=Graphics[{Line[zuobiao[[1]]],Line[zuobiao[[2]]],Line[zuobiao[[3]]],Line[zuobiao[[4]]],Line[{{0,0},{0,10},{10,10},{10,0},{0,0}}]}]; Show[g,AspectRatio?1]; 可分别代入数据观察 1） 2） 为了看到追逐轨迹，执行如上程序后，按提示依次键盘输入9、0.02、1,计算机就会给出如下追逐轨迹图： 图5-1 tn=9秒，dt=0.02秒、v=1米/秒的追逐轨迹 如果执行如上程序后，按提示依次键盘输入10、0.02、1,计算机就会给出如下追逐轨迹图： 图5-2 tn=10秒,dt=0.02秒,v=1米/秒的追逐轨迹图。 从计算机模图中可以清楚地看到追逐最终将安螺旋状曲线汇合于一点。