c語言試驗(yàn)報(bào)告0001

1、華北水利水電大學(xué)C語言程序設(shè)計(jì)實(shí)驗(yàn)報(bào)告2014-2015學(xué)年 第二學(xué)期20 級材料成型及控制工程專業(yè)學(xué)號姓名：一、實(shí)驗(yàn)題目：順序結(jié)構(gòu)二、實(shí)驗(yàn)?zāi)康模海裕┤?、?shí)驗(yàn)內(nèi)容1 程序驗(yàn)證（略）2 程序設(shè)計(jì)1) 編寫程序,己知圓半徑radiush.25,求圓周長和面積。 源代碼：運(yùn)行結(jié)果:#/n elude <stdio.h>#defi ne PI 3.14159 void mai n()float r,c,s;r=1.25;c=2*PI*r;s=PI*r*r prin tf(,c=%f1s=%fn,',c,s);2) 編寫程序完成單個(gè)字母的大小寫轉(zhuǎn)換。 源代碼：運(yùn)行結(jié)果#in clu

2、de<stdio.h>void mai n () char c; c=,a'c=c-32;prin tf ("%c",c);3）任意從鍵盤輸入一個(gè)三位整數(shù)，要求正確分離出它的個(gè)位、十位和百位 數(shù)，并分別在屏幕上顯示。源代碼：wl#in elude <stdio.h>運(yùn)行結(jié)果:void mai n()int i,j,k,t;sea nf("%d", &t);i=t%10;j=V10%10;k=V100; printf(Mi=%dj=%d,k=%d,i,j,k);(1) 設(shè)變量a、b、e分別存放從鍵盤輸入3個(gè)整數(shù)。編寫

3、程序，按從大到小的順序排列這3個(gè)整數(shù)，使a 成為最大的，e成為最小的，并且按序輸出這3個(gè)整數(shù)。源代碼：運(yùn)行結(jié)果：#i nelude <stdio.h>int mai n ()int a,b,e,t;scan f(”d%d%d“,&a,&b,&c);if(a<b)t=a;a=b; b=t;if(a<e)t=a;a=e;e=t;if(e>b)t=e;e=b; b=t;prin tf(”d%5d%5dn”,a,b,c);return 0;(2) 輸入某學(xué)生的考試成績等級 A、B、C、D,要求 按照等級輸出對應(yīng)的分?jǐn)?shù)段。A級對應(yīng)分?jǐn)?shù)段為80-100

4、, B級對應(yīng)分?jǐn)?shù)段7079, C級對應(yīng)分?jǐn)?shù)段60-69 , D級對 應(yīng)分?jǐn)?shù)段為60分以下。歡迎下載#源代碼：結(jié)果：#in elude <stdio.h>void mai n()float s;prin tf("please in put s:"); scan&s);if(s<60)prin tf(”D”);else if(s<70)prin tf("C");else if(s<80)prin tf("B");elseprin tf(”A");運(yùn)行:milUilWTOLIBiIhn*歡迎下

5、載71）找出100-900之間的無暇素?cái)?shù)。所謂無暇素?cái)?shù)是指本身為素?cái)?shù)，且其逆序數(shù)也是素?cái)?shù)的數(shù)。例如："3是一個(gè)素?cái)?shù)，3門也是一個(gè)素?cái)?shù)，"3就是無暇素?cái)?shù)。源代碼：#in clude<stdio.h>#in clude<math.h>運(yùn)行結(jié)果:im 10711313115115? it? "91B119119?31131333?3473533593733B33B?781""97277337427517S77617B7797 一Press eftny kty tu culllllkut”void mai n 0int n,a,

6、b,c,k,d,i,flag;for(n=100 ;n<=900; n+)flag=1; k=(i nt)sqrt (n);for(i=2;i<=k;i+)if(n %i=0) flag=O;if(flag)a=n%10;b=n/10%10;c=n/100; d=a*100+b*10+c;k=(i nt)sqrt(d);for(i=2;i<=k;i+)if（d%i=O） flag=O;if（flag）prin tf（”7d”, n）;prin tf（'、n“）；2）編程：用迭代法求某數(shù)a的平方根。平方根的迭代公式如卜:Xn*i=（Xn+a/Xn）/2； 設(shè) Xo=a/

7、2;當(dāng)?shù)噜弮身?xiàng)差的絕對值小于時(shí)，迭代結(jié)束。源代碼：#i nclude<stdio.h> 運(yùn)行結(jié)果:#in clude<math.h> void mai n() float a,x0,x1;printf("lnput a:");scan&a);if(a<0) prin tf("Error!n");elseInput a： 25 sqpt<25-G0QB00 =7_2 50003Press an5;to cont inuex0=a/2;x 仁(x0+a/x0)/2;for(;fabs(x0-x1 )<1

8、e-5;)x0=x1;x1= (x0+a/x0)/2;prin tf(,sqrt(%f)=%fn,a,x1);* its factors areits factors496, its Factors are1）編程找出1000以內(nèi)的所有完全數(shù)，并輸出使該數(shù)成為完全數(shù)的因子。（例如6二1+ 2+3。按照 6, its factors are 1,2,3 格式輸 出）。歡迎鶴弋碼：#include<stdio.h>運(yùn)行結(jié)果：b24*49iAess anu keu to fontinuevoid mai n()int im n;for (m=2;m<1001;m+)n=0;for(

9、i=1;i<m;i+)if(m%i=0)n=n+i;if(m=n)prin tf(H%d, its factors arenH,m);for(i=1;i<m;i+)if(m%i=0)if(m=n)prin tf("%dn",i);2)從鍵盤輸入字符串a(chǎn)和字符串b,并在a串中的最小元素后面插入字符串b源代碼:運(yùn)行結(jié)果:please input strlntj : S 5 1 2 5 please input string : 41 5 255 1 2 41 52G 5 1Press Anyto centinue#i ncludevstdio.h#in clude<stri ng.h>void mai n()chara200,b200,i=0,mi n=O,j; prin tf(Hplease in put stri ng a:H); gets(a);prin tf(Hplease in put stri ng b