vfp編程題答案

1、順序結(jié)構(gòu)程序設(shè)計 順序結(jié)構(gòu)程序設(shè)計1.從鍵盤輸入長方體的長、寬、高，求長方體的 從鍵盤輸入長方體的長、寬、高，求長方體的表面積。 表面積。input “輸入長方體的長：” to xinput “輸入長方體的寬：” to yinput “輸入長方體的高：” to zs=2*x*y+2*x*z+2*y*z?”長方體的表面積為：”,s2.從鍵盤輸入圓的半徑，計算圓的面積。 從鍵盤輸入圓的半徑，計算圓的面積。input “輸入圓的半徑：” to

2、 rs=3.14*r^2?”圓的面積為：”,s3.建立數(shù)據(jù)庫 建立數(shù)據(jù)庫 XS，將表 ，將表 XSQK.DBF 添加到該 添加到該數(shù)據(jù)庫，并瀏覽該表所有數(shù)據(jù)，最后關(guān)閉數(shù)據(jù) 數(shù)據(jù)庫，并瀏覽該表所有數(shù)據(jù)，最后關(guān)閉數(shù)據(jù)庫。 庫。Create database xsAdd xsqkBrowseClose all4.在表 在表 XSQK.DBF 中，查找出生日期為 中，查找出生日期為 1983年 10 月 8 日的記錄，并顯示該記錄；繼續(xù)

3、查找 日的記錄，并顯示該記錄；繼續(xù)查找下一個滿足上述條件的記錄，并顯示該記錄。 下一個滿足上述條件的記錄，并顯示該記錄。Use xsqkLocate for 出生日期 ={^1983-10-8}DisplayContinueDisplayUse分支結(jié)構(gòu)程序設(shè)計 分支結(jié)構(gòu)程序設(shè)計1. 從鍵盤輸入一個數(shù)，若為正數(shù)則輸出，非正 從鍵盤輸入一個數(shù)，若為正數(shù)則輸出，非正數(shù)則結(jié)束。 數(shù)則結(jié)束。input “輸入一個數(shù)：” to xif x&g

4、t;0?xendifreturn2. 求一元二次方程 求一元二次方程 AX2+BX+C=0 的實根。 的實根。input “輸入系數(shù) A：” to ainput “輸入系數(shù) B：” to binput “輸入系數(shù) C：” to cm=b^2-4*a*cif m>=0x1=(-b+sqrt(m))/(2*a)x2=(-b-sqrt(m))/(2*a)?”x1=”,x1, ”x2=”,x2else?”方程無實根！”endif3.

5、 從鍵盤輸入一個待查學(xué)生的學(xué)號，在表 從鍵盤輸入一個待查學(xué)生的學(xué)號，在表XSQK.DBF 中查找。若能找到，則顯示該記 中查找。若能找到，則顯示該記錄，否則，顯示信息“該學(xué)號不存在” 錄，否則，顯示信息“該學(xué)號不存在” 。use xsqkaccept “輸入待查學(xué)生學(xué)號：” to xlocate for 學(xué)號=xif not eof()displayelse?“該學(xué)號不存在” EndifUse4. 從鍵盤輸入一個自然數(shù)，若為偶數(shù)則輸出

6、信 從鍵盤輸入一個自然數(shù)，若為偶數(shù)則輸出信息“偶數(shù)” 息“偶數(shù)” ，若為奇數(shù)則輸出信息“奇數(shù)” ，若為奇數(shù)則輸出信息“奇數(shù)” 。input “輸入一個自然數(shù)：” to xif x%2=0?” 偶數(shù)”else?” 奇數(shù)”endifreturn5. 計算函數(shù) 計算函數(shù) Y 的值。 的值。5.答案 答案input “輸入 X 的值：” to xif x>=0f=3*exp(x+2)-1elsef=2*x+5Y=3ex+2-12X+5x&

7、gt;=0X<03級數(shù) 全月應(yīng)納稅所得額 稅率（%）1 不超過 500 元 52 500～2000 元 103 2000～5000 元 154 5000～20000 元 205 20000～40000 元 256 40000～60000 元 307 60000～80000 元 358 80000～元 409 元以上 45clearinput “請輸入月收入：“ to ns=n-1600do casecase s<=500r=

8、s*0.05case s<=2500r=s*10case s<=5000r=s*15case s<=20000r=s*20case s<=40000r=s*25case s<=60000r=s*30case s<=80000r=s*35case s<=r=s*40otherwiser=r*0.45endcase?“應(yīng)納稅額為：“,rreturn循環(huán)結(jié)構(gòu) 循環(huán)結(jié)構(gòu)1. 求 S=1+2+3+…… …

9、…+100set talk offclears=0i=1do while i<=100s=s+ii=i+1enddo?“1~100 的和為：“,sReturn2. 求 N！的值。 ！的值。 （N！=1*2*3*…… ……*N）clearinput “請輸入 n 的值：“ to ns=1for i=1 to ns=s*iendfor?“n!=“,sreturn3. 計算 計算 101～500 之間的所有奇數(shù)之和。 之間的所有奇數(shù)之和

10、。clears=0for i=101 to 500if i%2!=0s=s+iendifendfor?“101-500 的奇數(shù)和為：“,sreturn4. 輸出 輸出 100～1000 之間能被 之間能被 37 整除的數(shù)。 整除的數(shù)。set talk offclearfor i=100 to 1000if i%37=0?iendifendforset talk onreturn5．求 ．求 S=1！+2！+3！+…… ……+10！cle