C語言程序設(shè)計II實驗報告

1、C語言程序設(shè)計II實驗報告題目：實驗五函數(shù)應(yīng)用院系名稱：計算機(jī)學(xué)院專業(yè)名稱：計算機(jī)科學(xué)與技術(shù)班級：學(xué)號：學(xué)生姓名：指導(dǎo)教師：實驗日期：2017年4月1日報告提交截止日期:2017年4月11日實驗?zāi)康?、掌握C語言函數(shù)的定義方法、函數(shù)的聲明及函數(shù)的調(diào)用方法及調(diào)用過程；2、掌握主調(diào)函數(shù)和被調(diào)函數(shù)之間的參數(shù)傳遞方式;實驗內(nèi)容與要求：1、求兩個整數(shù)的最大公約數(shù)和最小公倍數(shù)。用一個函數(shù)求最大公約數(shù)，用另一個函數(shù)根據(jù)求出的最大公約數(shù)求最小公倍數(shù)。(提示：設(shè)兩個整數(shù)是a,b，最大公約數(shù)是p,最小公倍數(shù)是q，那么ab=pq)2、用牛頓迭代法求方程f(x)=ax3+bx2+cx+d=0的根。系數(shù)a、b、c、d由

2、主函數(shù)輸入。求根過程寫成函數(shù)。(提示：牛頓迭代法是先給定方程f(x)=0的一個較好的初始近似根X0,然后重復(fù)使用迭代公式：xX。f(Xo)f'(Xo)求x的近似解，直至相鄰兩次的近似解相差很小為止，如差值的絕對值小于1e-07。xo可以從鍵盤輸入或直接設(shè)定。)3、定義一個函數(shù)，功能是計算n個學(xué)生的成績中高于平均成績的人數(shù)，并作為函數(shù)返回值。用主函數(shù)來調(diào)用它。統(tǒng)計30個學(xué)生成績中高于平均成績的有多少人。4、編寫程序，計算下列函數(shù)值：f(m,n)s(m)，其中，m,n為正整數(shù)，s(n)ns(n)p(i)p(1)p(2)p(n)，p(i)i!i15、編寫和調(diào)用函數(shù)，給定圓筒的內(nèi)徑、外徑和高，

3、計算該圓筒的體積；給定圓錐的高、底面半徑，計算該圓錐的體積和表面積。6、編寫和調(diào)用函數(shù)，求出10000以內(nèi)的所有素數(shù)、絕對素數(shù)、水仙花數(shù)、完全數(shù)（或稱完數(shù)）、互滿數(shù)。提示：一個素數(shù)經(jīng)過任意次調(diào)換位，仍然為素數(shù)，則稱其為絕對素數(shù)，例如13和31就是一個絕對素數(shù)。水仙花數(shù)是指一個三位整數(shù)，其各位數(shù)字立方之和等于該數(shù)。例如，153就是一個水仙花數(shù)：153=1*1*1+5*5*5+3*3*3。完全數(shù)是指一個數(shù)正好是它的所有約數(shù)（本身除外）之和。例如，6就是一個完全數(shù)，因為6的因子有1、2、3，并且6=1+2+3。如果有兩個數(shù)，每一個數(shù)的所有約數(shù)（除它本身以外）之和正好等于對方，則稱這兩個數(shù)為互滿數(shù)。三

4、、實驗結(jié)果1題目內(nèi)容與要求：求兩個整數(shù)的最大公約數(shù)和最小公倍數(shù)。用一個函數(shù)求最大II4I公約數(shù)，用另一個函數(shù)根據(jù)求出的最大公約數(shù)求最小公倍數(shù)。(提示：設(shè)兩個整II j;|數(shù)是a,b，最大公約數(shù)是p,最小公倍數(shù)是q，那么ab=pq)|II|卜«n»rara«rnwvb!nvb«*|i i算法簡要描述(文本)：通過循環(huán)找出最大公約數(shù)，根據(jù)公式求最小公倍數(shù)。1:i|源代碼標(biāo)識符說明(文本)：a,b存儲數(shù)字i,j找最小公倍數(shù)和最大公因數(shù)。|卜anwna-a«irwrannvbn»-!nIii源代碼(粘貼程序，注意縮進(jìn)，不得使用截圖)：Iiii

5、I#include"stdio.h"!intf(inta,intb)|inti,j;|iiif(a>b)iI3Ia=a+b;b=a-b;a=a-b;ifor(i=a;i>=1;i-)|if(a%i=0&&b%i=0)ireturni;i_一一i.I|ints(inta,intb,inti)|returna*b/i;汀imain()8打nta,b;|while(1)|!scanf("%d%d",&a,&b);【printf("最大公約數(shù)：dn最小公倍數(shù):%dn",f(a,b),s(a,b,f(

6、a,b);b*KB»lBLBN!BJB!KBKBKB»實驗測試結(jié)果(使用截圖，圖形格式JPEG。截圖不要包含源代碼)：討論(文本)：:2題目內(nèi)容與要求：用牛頓迭代法求方程f(x)=ax3+bx2+cx+d=0的根。系數(shù)a、b、IIc、d由主函數(shù)輸入。求根過程寫成函數(shù)。(提示：牛頓迭代法是先給定方程f(x)=0的一個較好的初始近似根X。，然后重復(fù)使用迭代公式f(X。)xX。f'(xo)求x的近似解，直至相鄰兩次的近似解相差很小為止，如差值的絕對值小于1e-07。xo可以從鍵盤輸入或直接設(shè)定。)rii算法簡要描述(文本)：通過構(gòu)造函數(shù)實現(xiàn)題中給的公式。|源代碼標(biāo)識符說明

7、(文本)：a,b,c,d,存系數(shù)x存根。III源代碼(粘貼程序，注意縮進(jìn)，不得使用截圖)：:丨#include"stdio.h"!#include"math.h" I丨floatf1(floata,floatb,floatc,floatd,floatx)|return(a*x*x*x+b*x*x+c*x+d);II汀floatf2(floata,floatb,floatc,floatx)Ireturn(3*a*x*x+2*b*x+c);IID I!main()1丨IwhileIfloata,b,c,d,x,y,m,n;j|scanf("%f%f

8、%f%f%f",&a,&b,&c,&d,&x);iido|x=y;|m=f1(a,b,c,d,x);n=f2(a,b,c,x);!y=x-(m/n);|while(fabs(x-y)>=1e-7);實驗測試結(jié)果（使用截圖，圖形格式JPEG。截圖不要包含源代碼）：11121-1.351212-1-2.H012121-2.00-11110-1.00討論（文本）-J-|printf("%.2fn",y);3i題目內(nèi)容與要求：定義一個函數(shù)，功能是計算n個學(xué)生的成績中高于平均成績iii丨的人數(shù)，并作為函數(shù)返回值。用主函數(shù)來調(diào)用它

9、。統(tǒng)計30個學(xué)生成績中高于平IIH均成績的有多少人。I一rSS-B¥kHIVBHI»«TSn«!WB«TS»*算法簡要描述(文本)：構(gòu)造函數(shù)求出平均值，再和平均值一一比較。I丨源代碼標(biāo)識符說明(文本)：p指針變量操作數(shù)組。q存大于平均值成績的個數(shù)。IIrinbtb9-kvbs-ebtbnH：s-e«.nna1*1.a-Bnwwnrawnhtvw!nvwimratranbtbs-B：*<bybn:bt:i源代碼(粘貼程序，注意縮進(jìn)，不得使用截圖)：#include"stdio.h":i丨intf(fl

10、oat*p,intn)!I4iinti,q=0;floats=0;jifor(i=0;i<n;i+)jis+=*(p+i);|for(i=0;i<n;i+)iif(*(p+i)>(s/n)|1丨q+;Ipireturnq;|j|main()jj|floata30;|inti,n=30;!for(i=0;i<n;i+):|scanf("%d",&ai);|printf("%d",f(a,n);!LL_!|實驗測試結(jié)果(使用截圖，圖形格式JPEG。截圖不要包含源代碼)：|3456678987E54567874523456543

11、6789肛345&6717討論（文本）I1題目內(nèi)容與要求：編寫程序，計算下列函數(shù)值：f(m,n)s(m)，其中，m,nls(n)iI|isin|!為正整數(shù)，s(n)p(i)p(1)p(2)p(n)，p(i)i!ii1II算法簡要描述(文本)：構(gòu)造一個階乘函數(shù)。I|卜!«mm«！!hm!irvn*1!mw¥|ii源代碼標(biāo)識符說明(文本)：x存數(shù)據(jù)。IIIjjII1源代碼(粘貼程序，注意縮進(jìn)，不得使用截圖)：I|#include"stdio.h"IIIlonglongs(intx)if(x=1)return1;Ireturnx*s(x-1)

12、;!longlongf(inta,intb)ireturns(a)/s(b);i:main():|!|inta,b;|while(1)|scanf("%d%d",&a,&b);Iprintf("%d!=%lld%d!=%lldn",a,s(a),b,s(b);|printf("s(a)/s(b)=%lldn",f(a,b);IWVJVjB«BillBiBtBML=!jB!*EBUKl|實驗測試結(jié)果(使用截圖，圖形格式JPEG。截圖不要包含源代碼)：|4-484!=248!-40320sCa/stbi-0848

13、*=40320484!=248!-40320sCa/stbi-0848*=403204!=24sCa>/s<b5=16904 £4*=245*=120s<a>/s<b>=045f=i264!=24s<a>s<b>=5989!-36288081=40320s<a>Zs<b>=91210討論（文本）：12!-477001600s<a>/s<b>-1325題目內(nèi)容與要求：編寫和調(diào)用函數(shù)，給定圓筒的內(nèi)徑、外徑和高，計算該圓筒的體積；給定圓錐的高、底面半徑，計算該圓錐的體積和表面積。1算

14、法簡要描述(文本)：構(gòu)造圓錐和圓筒體積表面積函數(shù)雲(yún)_4444_aBBJ1KB4源代碼標(biāo)識符說明(文本)：a,b,c存數(shù)據(jù)。源代碼(粘貼程序，注意縮進(jìn)，不得使用截圖):#include"stdio.h"#include"math.h"#definePI3.1415926floatv(floata,floatb,floath)if(b!=O)returnPl*(b*b-a*a)*h;returnPI*a*a*h/3;floats(floata,floath)return.PI*a*sqrt(a*a+h*h)+PI*a*a;汀imain():Ifloata,b

15、,h;iWhile(1)|!printf("請輸入圓筒的內(nèi)徑，外徑，高n");!iseanf("%f%f%f",&a,&b,&h);:|printf("v=%fn",v(a,b,h);:心°；：|printf("請輸入圓錐的半徑，高n");!|scanf("%f%f",&a,&h);Iprintf("v=%fs=%fn",v(a,b,h),s(a,h);iL)i|j實驗測試結(jié)果(使用截圖，圖形格式JPEG。截圖不要包含源代碼)

16、：|請輸入圓筒的內(nèi)徑，外徑，高2 34y=62.831852i青輸入圓錐的半徑.高3 5u=47.1238?B5=83-227759請輸入圓筒的內(nèi)徑.外徑.高123H-28.274334請輸入圓錠的半徑，高34L=37.G99112s=75.398224I一討EH題目內(nèi)容與要求：編寫和調(diào)用函數(shù)，求出10000以內(nèi)的所有素數(shù)、絕對素數(shù)、i水仙花數(shù)、完全數(shù)（或稱完數(shù)）、互滿數(shù)。I|提示：一個素數(shù)經(jīng)過任意次調(diào)換位，仍然為素數(shù)，則稱其為絕對數(shù)，例如13和31就是一個絕對素數(shù)。水仙花數(shù)是指一個三位整數(shù)，其各位數(shù)字立方之和I等于該數(shù)。例如，153就是一個水仙花數(shù)：153=1*1*1+5*5*5+3*3*3

17、。完全數(shù)是指一個數(shù)正好是它的所有約數(shù)(本身除外)之和。例如,6就是一個完全數(shù),可丨因為6的因子有1、2、3,并且6=1+2+3。如果有兩個數(shù)，每一個數(shù)的所有約!:1I|數(shù)(除它本身以外)之和正好等于對方，則稱這兩個數(shù)為互滿數(shù)。|；aiBanara*h|i算法簡要描述(文本)：構(gòu)造出各自函數(shù)，通過調(diào)用實現(xiàn)。絕對素數(shù)在已知的素iIiI:數(shù)里面通過移位再判斷是否是素數(shù)。IIaI|s*»«ITBBl!ra«ITB«IFSTBn««!tFVB««VBii源代碼標(biāo)識符說明(文本)：x,a,b,c存數(shù)據(jù)。Ij1II源代碼(粘貼程

18、序，注意縮進(jìn)，不得使用截圖)：i|#include"stdio.h"I#include"math.h"i:i!intf(inti)|jintj,k=sqrt(i);|for(j=2;j<=k;j+)|if(i%j=O)|break;|if(j>=k+1)|return1;Ielsereturn0;1intg(intx)|inti,a,b,c;|i!for(i=100;i<=x;i+)|ja=i%10;b=i/100;c=(i-b*100)/10;|iif(i<=999&&i=a*a*a+b*b*b+c*c*c)I|

19、printf("%d",i);|1ijinth(intx)|jinti,j,k,a;|:for(i=2;i<=x;i+)ia=0;Ifor(j=1;j<=i/2;j+)|!if(i%j=0)(IIIIii.a+=j;!iif(a=i)!printf("%d",i);I|intw(intx)|intj,a=O;|for(j=1;jv=x/2;j+)!if(x%j=O)I=a+=j;Ijreturna;II:!ints(intx)|=inti,j,k;!for(i=1;i<=x;i+)!jif(w(w(i)=i)i=if(w(i)<i

20、):continue;|printf("%d,%d",i,w(i);111I!Imain()|inti,j=0,x,a,b,c,m1000;|scanf("%d",&x);Iprintf("素數(shù)為:n");Ifor(i=2;i<=x;i+)if(f(i)|!printf("%5d",i);|if(i>9&&i<100)I|if(f(i%10*10+i/10)Imj+=i;|if(i>100&&i<=999)I|c=i%10;a=i/100;b=(

21、i-a*100)/10;|jif(a%2=0|b%2=0|c%2=0|a=5|b=5|c=5)continue;I|if(f(a*100+c*10+b)&&f(b*100+c*10+a)&&f(b*100+a*10+c)&&f(c*100|+b*10+a)&&f(c*100+a*10+b)|mj+=i;|printf("n絕對素數(shù)為：")；for(i=0;i<j;i+)|printf("%d",mi);|printf("n水仙花數(shù)為:");g(x);|printf(

22、"n完全數(shù)為:");h(x);|printf("n互滿數(shù)為:n");s(x);b實驗測試結(jié)果(使用截圖，圖形格式JPEG。截圖不要包含源代碼)：lUMdU琢勺-2357It131719232931374143i?5359f*771737¥K：4IWt1U31ST?1H911312713113713?H?Hi15?1G914717317?191r?i1?919719?21122322?2292i32392412S125726327127?291263293307111313317:m33734734935335?3fi7S73373S3tR?37

23、4B1訕419421431<1334394434494S74946?4W487491iyyS035EHS21523541547557S71577587599Aflfl&H761961761?631G41643G47C53659G61fc?367?6S3&91701709719727'233?iy74J7bl757TfcL7b«?77378>»11823B271829B390関057059BG367788188309?907VL1?19929¥37?41947V53WV71VW問yvt9V7l(dU9詢2IMIV1U21訥丄1U3

24、3ituylk)4¥mi1061Jfl$31M91B8710$11H3lft?71103110911171123112»11511153£1«311711181im1193120112131217122312291231122?134912E9127?127912631289129112*713RL13R313B71319132113271)611367117313B1139914PM1423112?1429JW113914471451H53145911711491i他14®714B91493imISli123LSJ11541S491E5315

25、S91S671S711S7»15盼1597l&tn1&07応呻LBlf16211E2?1GT?1>&571(pG31G671G6?16931G?lfr?917B91721172317331?11174?1?S3175917771?8317071799nai1S1118231«31184?18G11氈71871187318771B75IRfi?I9R719131931t?3319511?73197f19S7195319719?92RR320112E1?2B27202928992BG9sets20G92Q812BB32BB?28892399Sill

26、2L1321292131213721412143215321612179220322077.2132221223722392243225122E722692273223122E722¥3229723B?23112333233923412347135123572371237?33S12332JH92刖3；zivy2411241724234U24472b7247JZ4772bUJ2521253125392543254925512557257925912593SfiM261?2&Z12£3326472fi57溫沙2Lb32b'laE>772bH7k!6H?如

27、丫N7W727112713271927292731274112749275327S727772789279127972S0126832*19283328.n2«432051285728Al287*2266728?298329092917292729392953EVE?29C329t929712fl9?300130113Bl?M233B173B4I3D491M1伽73W793M33fl«93I«3119HI議1113731殆3lfi73詢916119?311?i32833209321?32213229325132533257325932713那33013107331

28、333193J2333ZV333133433347336V3?6133713373338933913407341334333W34S734f1346334fi73491河t381735273529353S3SS935413S4?3S57言5£935713£81JbH33£帕3&07K133tl?3B2336313&373433&&93G?135733fi773BV13h?isvni37139371937273733373937E1376737BS1387793793379739B33B213B23303338473B51365338

29、6338?8913B693907am3S17391939233929JV43JV4?鶉34MV4UMt4»MM4MO74H1m4M1?411214B274m乎4WS14070407t40»14S93409941114127412S41334139415941574iS9417742914211J4217型計4229421.4241424J型!>34曲42"427142734廂428942V743274唧433943494357456343734391439744«9442144?3444144474451445744&344R1448344

30、93450?4S13«1745194E1345474E4f4&&14E67佔酣4&9145974GK46214fc374fi3*4*4ft494g574EK34734679斗阿47W3472147214729473347514t37釀叨4G43祕*4GE1転初4C79弘如4?0J472147294?25訊的47E1447BJ47M74784K347994»U14Sld4174MJ14titl4(214T"犧肝刪耐494»1»49314?33-19374?4J«514M7«67496f4?Z)49S74

31、9?049$9JJP03500?5M1>>KjlbU2JSkUVbWblb07?鶯曲丄bUU?、陽丫雪：1幗blU?6113Sll¥bl42S1&3£lb75L71517951H951?75?Rf52275235233533?5J6J5J73S2795?«lS29753PI4即U3J35J17前51EJ61SJ07石卻31995d0?t4LJ5117石鉗31507EHM£401+4?5>471547754795甫tJg5501550J5B7551?專5N1552755H155$?55t?$573廟旳5?1師刃563?5&

32、415017:?隔15«53565?兀575CG?5633569?5?®15711E7175737S741&743574*57?9E791S801£0即E01J5821S827ES395因43&Sd958515S575861596758fiT5«795Fffil589759835?235927593959535?R1SS«76W76611G02?£337tO436847EB53t3t?G073&B79£099GB916131Gil3&131&1316133bl36151617361.7

33、falWb2U36211b217t221b2?b347b2?>762B3bb?b7162776£S7鉉粘63616311£31763236329633?£343&3536359G36L63B7fc3736mt421右鰹76449&4!>1£如丫t47JbSlCi4Vl(>S47b!>bibbJ65696S?l65776強(qiáng)i6S9*66076&1?6637&6536596661667366?e$S946?1tTFJ6701G70?t719G?35GZ1?G7C1G?G3t?TO&761

34、3;7?1t?9J£B83Gfl2)tS27&S2?C033bNlhtihVbN6：«hSVlhtiKHfi?W7hVIl叭917勺bS9h?h1Vi&¥fcWl6*77陰町7127?12971&17159717?1»7?L$372ff?V2117213?21V?22J73卯721372傭制£37»R372?7733773fl?73H1731173373497351715?747774917A97TIB?4?9?5®7751?75237529?537?511754?TEST7&&17573茹77758375*7759176H37&H776397b43屜4丫7EE勺76737&叭7EI77fc91769T7703771?77237727774177537?577759770977937B177S23782S7B417853?St?丹737B77QW797893?9S1?«?7919792?7»337937沔割Wil7»E>393d刪9Rfll18m?K3398S53«05*90698WL8H