資源描述：
《精選VFP常見編程實例.doc》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫。
1、精選VFP常見編程實例1、1-100的累加2、階乘求5的階乘3、求階乘和求1至5的階乘和4、條件定位查詢定位記錄指針在趙偉上5、用scan語句查詢定位用scan語句查詢定位記錄在趙偉上6、用scan語句掃描符合條件的記錄，并顯示出來把年齡小于30歲的人顯示出來7、查找男性職工查找男性職工8、新值換舊值有一對新生的兔子，從第三個月開始，每個月出生一對兔子，請問到第十二個月共出生多少對兔子？9、多位整數(shù)各個位數(shù)相加10、找100-999之間的“水仙花數(shù)”11、判斷一個大于3的數(shù)是否為素數(shù)12、求一個班級每個學(xué)生的平均
2、成績計算一個班級共三十名學(xué)生，每位學(xué)生5門功課的平均成績13、計算圓的面積14、將小寫字母轉(zhuǎn)換為大寫字母NOTE請將任意輸入的一個小寫字母轉(zhuǎn)換成大寫字母，也就是upper()函數(shù)的程序?qū)崿F(xiàn)15、找出最大數(shù)和最小數(shù)16、絕對值函數(shù)的實現(xiàn)17、絕對值函數(shù)實現(xiàn)的另一種方法18、輸出成績等級19、求一名學(xué)生的平均成績求一個學(xué)生5門功課的平均成績20、用數(shù)組的方法，計算一個學(xué)生的平均成績用數(shù)組保存一個學(xué)生五門功課的成績，然后再計算機其平均成績21、用docase語句實現(xiàn)符號函數(shù)的功能請輸入一個數(shù)，當(dāng)這個數(shù)是負數(shù)，就返回-1
3、，當(dāng)這個數(shù)是零，就返回零，當(dāng)這個數(shù)是正數(shù)，就返回122、用一般選擇語句實現(xiàn)符號函數(shù)的功能符號函數(shù)的實現(xiàn)23、用簡單選擇語句實現(xiàn)符號函數(shù)功能符號函數(shù)的實現(xiàn)24、打開數(shù)據(jù)庫和數(shù)據(jù)表25、顯示表中指定信息26、詢問后再由用戶按（Y/N)鍵執(zhí)行的程序?qū)崿F(xiàn)求任意一個數(shù)的階乘27、根據(jù)exact的設(shè)置進行字符串匹配比較exact設(shè)置的變化對取值結(jié)果的影響28、使一個多位正整數(shù)逆序排列29、按編號查找并列出一條記錄30、打開一個數(shù)據(jù)庫，并顯示其中的表內(nèi)容31、驗證密碼程序32、編程求稅金33、用三角形列出乘法口訣表34、將變量
4、A、B值互換35、找出已知三個數(shù)的中間數(shù)36、用參數(shù)傳遞計算圓的面積37、我國古代數(shù)學(xué)家張丘建在“算經(jīng)”里提出一個世界數(shù)學(xué)史上有名的百雞問題：雞翁一，值錢五，雞母一，值錢三，雞雛三，值錢一，百錢買百雞，問雞翁，母，雛各幾何?1、1-100的累加求1到100的累加值CLEARs=0i=1DOWHILEi<=100s=s+ii=i+1&&一定記住先累加后循環(huán)ENDDO?sRETURN2、階乘求5的階乘CLEARj=1i=1DOWHILEi<=5j=j*ii=i+1ENDDO?jRETURN3、求階乘和求1至5的階乘和
5、CLEARs=0i=1j=1DOWHILEi<=5j=j*is=s+ji=i+1ENDDO?sRETURN4、條件定位查詢定位記錄指針在趙偉上CLEARUSE學(xué)生LOCATEFOR姓名="趙偉"IFFOUND()DISPLAYELSECANCELENDIFCONTINUE5、用scan語句查詢定位用scan語句查詢定位記錄在趙偉上CLEARSCANFOR姓名="趙偉"DISPLAYENDSCANRETURN6、用scan語句掃描符合條件的記錄，并顯示出來把年齡小于30歲的人顯示出來CLEARSCANFOR年齡<3
6、0DISPLAYENDSCANRETURN7、查找男性職工查找男性職工CLEARLOCATEFOR性別="男"DOWHILEFOUND()DISPLAYCONTINUEENDDORETURN查找男性職工CLEARLOCATEFOR性別="男"DOWHILENOTEOF()DISPLAYCONTINUEENDDORETURN查找男性職工CLEARUSE職員基本信息表LOCATEFOR性別="男"DOWHILE.t.IFFOUND()thenDISPLAYELSE &&記住最后一個ELSE語句后面不需要條件表達式CA
7、NCELENDIFCONTINUEENDDO查找男性職工settalkoffclearopendatabase家庭成員管理.dbcusestu.dbfscanfornoteof()ifxb="女"skipelsedisplayskipendifendscanclosedatabaseusesettalkonreturn8、新值換舊值有一對新生的兔子，從第三個月開始，每個月出生一對兔子，請問到第十二個月共出生多少對兔子？clearstore1toa,bi=3dowhilei<=12c=a+ba=bb=ci=i+1e
8、nddo?"一年共出生兔子：",creturn9、多位整數(shù)各個位數(shù)相加CLEARs=0input"請輸入一個多位整數(shù):"toaDOWHILEa<>0s=s+MOD(a,10)&&將a取余正好是個位上的數(shù)a=INT(a/10)&&將a除10取整正好是除個位之后的數(shù)ENDDO?"這個整數(shù)的各個位數(shù)之和是：",sRETURN10、找100-999之間的“水仙花數(shù)”CLEARFO
