【正文】 o100do: wall:=curve([[,0],[,0]],color=black,linestyle=solid,thickness=2): fixp:=rectangle([x1(t),],[x1(t)+,],color=turquoise): pendulum:=disk([x(t),y(t)],color=turquoise):lineW_P:=curve([[x1(t),0],[x(t),y(t)]],color=red): G1[t]:=display(pendulum,lineW_P,wall,fixp): enddo:display([seq(G1[t],t=1..100)],insequence=true,scaling=constrained,axes=none,title=`SlidingPendulum`)。 S:=dsolve({equ1,equ2,theta(0)=0,D(theta)(0)=,x(0)=0,D(x)(0)=1},{x(t),theta((tt))},method=rkf45,type=numeric,output=val)。 equ1:=diff(x(t),[t$2])*(m+M)+M*L*diff(theta(t),[t$2])*cos(theta(t))M*L*diff(theta(t),t)^2*sin(theta(t))=0。with(DEtools): 調(diào)用微分方程工具包 with(plots): 調(diào)用圖形包 with(plottools): 調(diào)用圖形工具包 g:=。 繪制相位隨時間變化曲線圖 DEplot([equ1,equ2],[theta(t),x(t),t=0..10,[[theta(0)=0,D(theta)(0)=,x(0)=0,D(x)(0)=1]],stepsize=,linecolor=t/2])。 forito100do val[i]:=i/10 enddo。m:=1。 1）滑塊 A 的位移 x 隨時間 t的變化曲線圖 2 滑塊的位移隨時間的變化曲線 2）角度φ隨時間 t的變化曲線圖 3角度隨時間的變化曲線 3）滑塊擺的運動動畫圖 4滑塊擺運動動畫 附錄程序： restart。with(DEtools): 調(diào) 用微分方程工具包 with(plots): 調(diào)用圖形包 with(plottools): 調(diào)用圖形工具包 g:=。 equ1:=diff(x(t),[t$2])*(m+M)+M*L*diff(theta(t),[t$2])*cos(theta(t))M*L*diff(theta(t),t)^2*sin(theta(t))=0。 S:=dsolve({equ1,equ2,theta(0)=0,D(theta)(0)=,x(0)=0,D(x)(0)=1},{x(t),theta((tt))},method=rkf45,type=numeric,output=val)。 繪制滑塊擺運動動畫 fortto100do x1(t):=S[2,1][t,4]:x(t):=x1(t)+L*sin(S[2,1][t,2]):y(t):=L*cos(S[2,1][t,2]): enddo:fortto100do: wall:=curve([[,0],[,0]],color=black,linestyle=solid,thickness=2): fixp:=rectangle([x1(t),],[x1(t)+,],color=turquoise): pendulum:=disk([x(t),y(t)],color=turquoise):lineW_P:=curve([[x1(t),0],[x(t),y(t)]],color=red): G1[t]:=display(pendulum,lineW_P,wall,fixp): enddo:display([seq(G1[t],t=1..100)],insequence=true,scaling=constrained,axes=none,title=`SlidingPendulum`)。L:=2。 equ22:=L*diff(theta(t),[t$2])+diff(x(t),[t$2])*cos(theta(t))+g*sin(theta(t))=0。 eval(s)。 第三篇： Word文字處理實驗報告 計算機引論 —— 操作實驗 姓 名 （ 學(xué) 號 ）： ______________________ 年 級 （ 專 業(yè) ）：_____________成績： ________實驗時間： ________________________實驗地點： ___________________________ 實驗 31： 一、實驗?zāi)康模? 掌握中文輸入法及使用 Word進行文字處理的基本操作。 4．在“常用”工具欄上添加命令“另存為”，為其選擇一個按鈕圖像，將其與命令“保存” 按鈕放置在同一個組中。 8．將文件“第 1 章緒論 .doc”中的文字“計算機”全部替換為“ Computer”，將文件 保存在文件夾“自己的學(xué)號 \實驗 3”中。 8．保存更改后的文件“第 1章緒論 .doc”。 2．將文件“第 1 章緒論 .doc” 中的數(shù)字序號刪除，改成 A） B）C）的編號形式。 實驗 34： 一、實驗?zāi)康模? 掌握在 Word文檔中制作特殊文字效果，插入藝術(shù)字和圖片。 4．在文件“網(wǎng)絡(luò)文字 .doc”最后一行末尾插入一個自選圖形“虛尾箭頭”，要求高 厘米， 寬 1 厘米，箭頭與該行文 字平齊。 —— 另存為 —— “ 20211060257\實驗 3” —— 保存。 “第 2章計算機工作原理 .doc”中編輯公式： x1x2 x2 x1 2x12 x2 cos cos “第 2章計算機工作原理 .doc”。 三、實驗步驟：（學(xué)生自己填寫） Word文檔 —— 更改其名稱 —— 輸入指定內(nèi)容； —— 添加指定文字 —— 從自選圖形中選擇箭頭 —— 用繪圖工具欄中的“選擇對象”按鈕選中整個圖形 —— 右鍵—— 組合 —— 將其移動到指定位置 —— 右鍵 —— 設(shè)置對象格式 —— 版式 —— 高級 —— 上下型 —— 微調(diào)其位置； “公式編輯器” —— 打開 —— 使用工具編輯器編輯該公式； —— 打印預(yù)覽； —— 另存為 —— 找到文件夾“ 20211060257\實驗 3”； “實驗三 Word 文字處理” —— 文件夾 —— 另存為 ——“ 20211060257\實驗 3”； “實驗 3”文件夾上 —— 右鍵 —— 添加到壓縮文件—— 提交。 及時傳達學(xué)習(xí)。以開展黨的路線教育實踐活動為契機，縣扶貧和移民辦