mathematics第4講-文庫吧資料
2024-11-17 05:18本頁面
【正文】 , a] == 0, s = s+a]。 a = 2。編制程序，找出1～1000之間的全部“完備數(shù)”。 If[s == n, Print[n] ],第二十九頁，共四十五頁。 a++。 s = 1。 For[n=1, n=1000, n++, t = If[Mod[n,2] == 0, n/2, n/3]。,【例314】“完備數(shù)”是指一個數(shù)恰好等于它的因子之和，如6的因子為3，而6 = 1 + 2 + 3，因而6就是完數(shù)。據(jù)此畫出流程圖。 分析：根據(jù)所提問題可知，要想知道一個自然數(shù)是否為完數(shù)，首先必須找出其所有因數(shù)。,【例314】“完備數(shù)”是指一個數(shù)恰好等于它的因子之和，如6的因子為3，而6 = 1 + 2 + 3，因而6就是完數(shù)。 While[s=5, s=s+1/n。 s=0。 s,第二十六頁，共四十五頁。 While[i = 25, s = s + i。,2. While函數(shù) While函數(shù)的語法格式為： While[條件，循環(huán)體] 【例312】 s = 0。 L3=(n==Mod[n^2,1000])。,【例311】找出1~1000之間的全部“同構(gòu)數(shù)” For[n=1,n=1000,n++, L1=(n==Mod[n^2,10])。一個1位數(shù)是同構(gòu)數(shù)的條件是：x = Mod[x^2, 10]，一個2位數(shù)是同構(gòu)數(shù)的條件是：x = Mod[x^2, 100]等， 據(jù)此畫出流程圖，如圖所示。,【例311】找出1~1000之間的全部“同構(gòu)數(shù)” 分析：如果一個數(shù)出現(xiàn)在其平方數(shù)的右端，則稱此數(shù)為同構(gòu)數(shù)。 For[i=1,i=9,i++, q={}。 For[n=100, n=1000, n++, If[Mod[n,37]==0,AppendTo[str,n]]] str,第二十二頁，共四十五頁。,【例39】輸出能被37整除的三位整數(shù)。 For [x=1, x=100, x++, For[ y=1, y=100, y++, z = 100 x y。下面用窮舉法，將各種可能的組合全部一一測試，將符合條件的組合輸出即可,第二十頁，共四十五頁。,第十九頁，共四十五頁。 i = 5, i = 25, i = i + 2, s = s + i。 i = 5, i = 25, i = i + 2, s = s + i]。,1. For函數(shù) For函數(shù)的語法格式為： For[i=初值, i=終值, i增量, 循環(huán)體],第十八頁，共四十五頁。 Mathematica提供的循環(huán)結(jié)構(gòu)函數(shù)有：For、Do、While。,4.1.3 循環(huán)結(jié)構(gòu) 循環(huán)是指在程序設(shè)計(jì)中，從某處開始有規(guī)律地反復(fù)執(zhí)行某一程序塊的現(xiàn)象，重復(fù)執(zhí)行的程序塊稱為“循環(huán)體”。,3. Switch函數(shù) Switch函數(shù)的語法格式為： Switch[表達(dá)式, 值1, 表達(dá)式1, 值2, 表達(dá)式2, .] Switch[表達(dá)式, 值1,表達(dá)式1, 值2,表達(dá)式2, . , _, 表達(dá)式n+1],第十五頁，共四十五頁。 x = If[w = 50, 2.5 w, If[w = 100, 3.5 w 5, 4.5 w 15]],第十
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1