VF程序設(shè)計編程題答案

1、第六章 程序設(shè)計編程題(3) 下面程序的運(yùn)行結(jié)果是(  ) 2008年4月選擇題14  SET EXACT ON  S="ni"+SPACE(2)  IF s= ="ni"   IF s="ni"    ?"one"   ELSE ?"two&quo

2、t;   ENDIF  ELSE   IF  s="ni"   ?"three" ELSE ?"four"  ENDIF ENDIF RETURN A ) one          B) two &#

3、160;         C) three           D) four1. 求園的面積（要求判斷半徑是否合理）16 / 16CleaInpu r= to rIf r>0 S=3.14*r*r ?sElse ?半徑錯誤！Endif2. 求分段函數(shù)Y的值Y=2x5 x>0x x=0| x | x<0CleaInpu x= to xIf x>0 Y=2

4、*x+5Else If x=0Y=x ElseY=abs(x) EndifEndif?y3. 輸入一個百分制成績判斷其等級（優(yōu)/良/中/及格/不及格）CleaInpu cj= to cjDo case Case cj>=90?優(yōu) Case cj>=80?良 Case cj>=70?中 Case cj>=60?及格 Orth?不及格Endcase4. 輸入若干個（個數(shù)不定）百分制成績判斷其等級（優(yōu)/良/中/及格/不及格）CleaInpu 請輸入處理幾個人的成績： to nFor i=1 to nInpu cj= to cjDo case Case cj>=90?優(yōu)

5、Case cj>=80?良 Case cj>=70?中 Case cj>=60?及格 Orth?不及格Endcaseendfor5. 求S1+2+3. . . . . .+100CleaS=0For i=1 to 100 S=s+iEndfor?s 6. 求S1×2×3. . . . . .×100Cleap=1For i=1 to 100 p=p*iEndfor?p7. 求S1+3+5. . . . .+99CleaS=0For i=1 to 99 step 2 S=s+iEndfor?s8. 求S12+34. . . . . .100Clea

6、S=0For i=1 to 100 S=s+(-1)(i+1)*iEndfor?s9. 求S1+1/2+2/3+3/5. . . . . .前10項之和CleaS=0A=1B=1For i=1 to 10 S=s+a/b T=a A=b B=t+bEndfor?s10. 求S1！+2！+3！. . . . . .+10！CleaS=0P=1For i=1 to 10P=p*i S=s+p Endfor?s11. 對學(xué)生表中所有入學(xué)成績650分的學(xué)生免去貸款CleaUse 學(xué)生Scan for入學(xué)成績>=650 .and. 貸款否=.t. Repl貸款否 with .f.EndscanUs

7、e* * * * * * * * * * * * * * * * * * * * *12. 輸出圖形CleaFor i=1 to 4 For j=1 to i?* Endfor ?EndforCleaFor i=1 to 4 For j=1 to 4-i? &&有一個空格 Endfor For j=1 to 2*i-1?* Endfor ?EndforCleaFor i=1 to 4 For j=1 to 4-i? &&有一個空格 Endfor For j=1 to i?* Endfor ?Endfor13. 判斷一個整數(shù)是否素數(shù)CleaInpu x= to x

8、For i=2 to x-1 If mod(x,i)<>0Loop ElseExitEndifEndforIf i>x-1 ?x,是素數(shù)Else ?x,不是素數(shù)Endif14. 判斷十個整數(shù)是否素數(shù)CleaFor j=1 to 10Inpu x= to xFor i=2 to x-1 If mod(x,i)<>0Loop ElseExitEndifEndforIf i>x-1 ?x,是素數(shù)Else ?x,不是素數(shù)EndifEndfor15. 找出兩個數(shù)的大數(shù)和小數(shù)CleaInpu x= to xInpu y to yIf x>y ?x,大,y,小Els

9、e ?y,大,x,小Endif16. 找出三個數(shù)的最大數(shù)和最小數(shù)CleaInpu x= to xInpu y to yInpu z to zIf x<y t=xx=yy=tElse If x<z t=xx=zz=t endifendifif y<z t=yy=zz=tendif?x,是最大數(shù),z,是最小數(shù)17. 找出十個數(shù)的最大數(shù)和最小數(shù)CleaDime a(10)For i=1 to 10 Inpu to a(i)EndforMax=a(1)Min=a(1)For i=2 to 10 If max<a(i)Max=a(i) ElseIf min>a(i) Min

10、=a(i)Endif EndifEndfor?max,min18. 找出2×3矩陣中的最大數(shù)和最小數(shù)cleadime a(2,3)for i=1 to 2 for j=1 to 3input a(+str(I,2)+,+str(j,2)+)= to a(I,j) endforendformax=a(1,1)min=a(1,1)for i=1 to 2 for j=1 to 3if max<a(I,j) max= a(I,j)else if min> a(I,j) min= a(I,j) endifendif endforendfor?max=,max,min=,min19

11、. 對三個整數(shù)從大到小排序ClearInput a= to aInput b= to bInput c= to cIf a<b T=a A=b B=tElse If a<c t=a A=cc=t endifendifIf b<c T=b A=c c=tendif?a,b,c20. 對十個整數(shù)從大到小排序（用選擇法和起泡法兩種方法）選擇法:ClearDime a(10)For i=1 to 10 Input to a(i)EndforFor i=1 to 9 Max=a(i) Num=i For j=i+1 to 10If max<a(j) max=a(j) Num=jE

12、ndif Endfor If i<>num t=A(i) a(i)=a(num) a(num)=t EndifEndforFor i=1 to 10 ?a(i),' 'Endfor起泡法：ClearDime a(10)For i=1 to 10 Input to a(i)EndforFor i=1 to 9 For j=1 to 10-i If a(j)<a(j+1) t=A(j) a(j)=a(j+1) a(j+1)=t Endif endforEndforFor i=1 to 10 ?a(i),' 'Endfor21. 輸出Fibonacc

13、i（斐波那契）數(shù)列的前十項ClearDime a(10)a(1)=1a(2)=1For i=3 to 10 a(i)=a(i-1)+a(i-2)EndforFor i=1 to 10 ?A(i)Endfor22. 輸出楊輝三角的前十行ClearDime a(10,10)For i=1 to 10 A(I,1)=1 A(I,i)=1EndforFor i=3 to 10 For j=2 to i-1A(I,j)=a(i-1,j)+a(i-1,j-1) EndforEndforFor i=1 to 10 For j=1 to i?A(I,j) Endfor ?Endfor23. 對2×3

14、矩陣轉(zhuǎn)置CleaDime a(2,3),b(3,2)for i=1 to 2 for j=1 to 3input to a(I,j) endforendforfor i=1 to 3 for j=1 to 2b(I,j)=a(j,i) endforendforfor i=1 to 3 for j=1 to 2?b(I,j) Endfor ?endfor24. 求三位數(shù)中的所有水仙花數(shù)（即指一個三位數(shù),其各位數(shù)字立方和等于該數(shù)本身）Cleafor x=100 to 999 a=int(x/100) b= mod(int(x/10),10) c=mod(x,10) if x=a*a*a+b*b*b

15、+c*c*c ?xEndifendfor25. 求100以內(nèi)的所有完數(shù)（即一個數(shù)恰好等于除它本身外的所有因子之和）Cleafor i=3 to 100 s=0 for j=1 to i-1 if mod(i,j)=0 s=s+j endif endfor if i=s ?i endifendfor 26. 已知三角形的三邊（從鍵盤輸入），求其面積(S2=p(p-a)(p-b)(p-c), p=(a+b+c)/2)Cleainput 'a=' to ainput 'b=' to binput 'c=' to cif a+b>c and a+c

16、>b and b+c>a p=(a+b+c)/2 s=sqrt(p*(p-a)*(p-b)*(p-c) ?selse ?'三邊不能組成三角形'Endif27. 求二元方程的根（分三種情況：兩個不等實(shí)根，兩個相等實(shí)根，無實(shí)根）cleainpu 'a=' to a &&a<>0inpu 'b=' to b &&b<>0inpu 'c=' to ci=b*b-4*a*c if i<0 ?"方程無實(shí)根!" else if i=0 r=(-b)/(

17、2*a) ?"方程有兩個相等實(shí)數(shù)根:",r else x1=(-b+sqrt(i)/(2*a) x2=(-b-sqrt(i)/(2*a) ?"方程有兩個不相等實(shí)數(shù)根:",x1,x2 endifendif28. 輸入任意一個五位整數(shù)，前后對應(yīng)位置上的數(shù)據(jù)進(jìn)行交換重新排列（即逆序排列）（例：2598448952）cleadime a(5)inpu to ba(1)=int(b/10000)a(2)=mod(int(b/1000),10)a(3)=mod(int(b/100),10)a(4)=mod(int(b/10),10)a(5)=mod(b,10)for

18、 i=1 to int(5/2) t=a(i) a(i)=a(6-i) a(6-i)=tendforc=a(1)*10000+a(2)*1000+a(3)*100+a(4)*10+a(5)?b,c29. 找出一個3x3矩陣的“鞍點(diǎn)”，即該位置上的元素在該行上最大，在該列上最小（也有可能沒有鞍點(diǎn)）cleadime a(3,3) flag=.t.for i=1 to 3 for j=1 to 3 input 'a('+str(I,2)+','+str(j,2)+')=' to a(i,j) endforendfor for i=1 to 3 max=

19、a(i,1) col=1 for j=2 to 3 if max<a(i,j) max=a(i,j) col=j endif endfor min=a(1,col) row=1 for k=2 to 3 if min>a(k,col) min=a(k,col) row=k endif endfor if max=min ?a(row,col),'是鞍點(diǎn)，在',row,'行',col,'列' flag=.f. endifendforif flag=.t. ?'無鞍點(diǎn)'endif30. 求S(n)=a+aa+aaa+.+a

20、aa.aaa(其中有n個a)之值，a是一個數(shù)字，n和a由鍵盤鍵入(例如：2+22+222+22222+22222，此時n=5)cleainpu 'a=' to ainpu 'n=' to ns=0t=afor i=1 to n s=s+t t=a+t*10endfor?s1、 屬性表示對象的狀態(tài)；方法描述對象行為的過程.2、 域是指屬性的取值范圍.3、 從兩個關(guān)系中找出滿足符合條件的元組或?qū)傩越M成一個新的關(guān)系的操作稱為聯(lián)接.4、 事件可以由系統(tǒng)引發(fā)，也可以由用戶引發(fā).5、 關(guān)系模型是指用二維表的形式表示實(shí)體和實(shí)體間了解的數(shù)據(jù)模型.6、 建立完整性的前提是先建立表

21、之間的了解.7、 關(guān)系數(shù)據(jù)庫中每個關(guān)系的表示形式是二維表.8、 用二維表數(shù)據(jù)來表示實(shí)體及實(shí)體之間了解的數(shù)據(jù)模型稱為關(guān)系模型.9、 任何一個數(shù)據(jù)庫管理系統(tǒng)都是基于某種數(shù)據(jù)模型建立的。數(shù)據(jù)庫管理系統(tǒng)支持的數(shù)據(jù)模型分為3種：關(guān)系模型、層次模型、網(wǎng)狀模型.10、 Visual Foxpro的程序設(shè)計方式有面向過程，面向?qū)ο髢煞N.11、 關(guān)系數(shù)據(jù)庫的3種關(guān)系運(yùn)算是選擇，投影，聯(lián)接.12、 若關(guān)系中的某一屬性組的值能惟一地標(biāo)識一個元組，則稱該屬性組為關(guān)鍵字.13、 項目管理器用于將一個應(yīng)用程序文件的所有文件集合成一個有機(jī)的整體，形成一個擴(kuò)展名為.pjx的項目文件.14、 字符型常量也叫字符串，由可打印的字

22、符或漢字構(gòu)成。字符型常量必須用定界符括起來，定界符有3種，分別為單引號（），雙引號（”）,方括號（【】）.15、 LEN（）函數(shù)的返回值為數(shù)值型數(shù)據(jù).16、 函數(shù)的一般形式為函數(shù)名（【參數(shù)1】【參數(shù)2】）17、 在Visual Foxpro中，清除指定的內(nèi)存變量的格式為RELEASE<內(nèi)存變量名表>.18、 DATETIME（）返回值的數(shù)據(jù)類型是日期時間型.19、 執(zhí)行？DAY（2003-10-15）命令后的顯示結(jié)果是15.20、 執(zhí)行？LEFT(“HAPPY NEW YEAR”,8)命令后的顯示結(jié)果是HAPPY NE.21、 執(zhí)行？UPPER(“Sunday星期日“)命令后的顯示

23、結(jié)果是SUNDAY星期日.22、 Visual Foxpro中的SKIP命令可使記錄指針相對移動.23、 在Visual Foxpro中，要使所有職稱為“工程師“的記錄的工資增加50，應(yīng)使用的命令是REPLACE ALL 工資WITH工資+50FOR職稱=”工程師“.24、 在Visual Foxpro中，“表”文件的擴(kuò)展名是.dbf.25、 在Visual Foxpro中，建立永久性關(guān)聯(lián)的前提是必須先對需要關(guān)聯(lián)的各個表建立索引.26、 數(shù)據(jù)庫表之間的關(guān)系有一對一、一對多和多對多.27、 自由表可以建立的索引有候選索引，惟一索引，普通索引.28、 一個數(shù)據(jù)表是由表結(jié)構(gòu)和記錄組成的.29、 在定

24、義表結(jié)構(gòu)時，要分別定義表中每一個字段的字段名，類型和寬度.30、 在數(shù)據(jù)庫中對兩表建立關(guān)系時，要求父表的索引類型必須是主索引或候選索引，而子表的索引類型則可以是普通索引.31、 物理刪除數(shù)據(jù)表中的部分記錄前，應(yīng)先對記錄進(jìn)行邏輯刪除.32、 按照文件主名不同，復(fù)合索引文件可以分為結(jié)構(gòu)復(fù)合索引和非結(jié)構(gòu)復(fù)合索引.33、 在Visual Foxpro中，顯示記錄的命令是LIST和DISPLAY。他們的區(qū)別在于不使用條件時，LIST默認(rèn)顯示全部記錄.34、 Visual Foxpro索引是由指針構(gòu)成的文件，這些指針邏輯上按索引關(guān)鍵字值進(jìn)行排序.35、 Visual Foxpro支持兩類索引文件，分別為單

25、索引文件和復(fù)合索引文件。其中復(fù)合索引又分為結(jié)構(gòu)索引和非結(jié)構(gòu)索引.36、 可以長期保存在計算機(jī)內(nèi)的、有組織的、可共享的數(shù)據(jù)集合稱為數(shù)據(jù)庫.37、 當(dāng)刪除父表中的記錄時，若子表中的所有相關(guān)記錄也能自動刪除，則相應(yīng)的參照完整性的刪除規(guī)則為級聯(lián).38、 Visual Foxpro在SQL方面支持?jǐn)?shù)據(jù)定義、數(shù)據(jù)查詢、數(shù)據(jù)修改等功能.39、 在SQL中，插入記錄的命令是INSERT，修改記錄的命令是UPDATE.40、 SQL的查詢命令也稱為SELECT命令.41、 在SQL中，查詢空值時要使用IS NULL.42、 SQL的操作功能是指對數(shù)據(jù)庫中數(shù)據(jù)的操作功能，主要包括數(shù)據(jù)的插入和更新，刪除3方面的內(nèi)容

26、.43、 在SQL中，RIGHT JOIN稱為右聯(lián)接，它是指除滿足聯(lián)接條件的記錄出現(xiàn)在查詢結(jié)果外，第二個表中不滿足聯(lián)接條件的記錄也出現(xiàn)在查詢結(jié)果中.44、 在SQL語句中，AVG（）函數(shù)用來計算平均值.45、 在SQL語句中，字符串匹配運(yùn)算符用LIKE表示；*表示0個或多個字符；？表示一個字符.46、 在ALTER TABLE中，ADD用來添加新字段；ALTER用來修改已有字段。47、 在SQL-SELECT語句中，定義一個區(qū)間范圍的特殊運(yùn)算符是BETWEEN,檢查一個屬性值是否屬于一組值中的特殊運(yùn)算符是IN.48、 在VISUAL FOXPRO計算機(jī)檢索的函數(shù)中，count用于計數(shù)，sum用

27、于求和，avg用于求平均值。49、 SQL語句中BETWEEN A AND B表示的意義是在A和B之間且包含A和B.50、 查詢設(shè)計器中的排序依據(jù)選項卡對應(yīng)于SQL語句中的ORDER BY.51、 在Visual Foxpro中，視圖具有表和查詢功能.52、 在Visual Foxpro中，查詢是從指定的表或視圖查找滿足條件的記錄.53、 在Visual Foxpro中，聯(lián)接類型有內(nèi)部聯(lián)接、左聯(lián)接、右聯(lián)接,完全聯(lián)接.54、 使用視圖的更新功能可以修改表中的數(shù)據(jù).55、 在關(guān)系數(shù)據(jù)庫中，視圖依賴于表，但是不獨(dú)立存在.56、 在Visual Foxpro中，視圖可以分為本地視圖和遠(yuǎn)程視圖.57、

28、創(chuàng)建視圖時，相應(yīng)的數(shù)據(jù)庫必須處于打開狀態(tài).58、 執(zhí)行FORENDFOR語句時，若步長為正值，則循環(huán)條件為=。若步長為負(fù)值，則循環(huán)條件為.59、 在簡單的輸入輸出命令中，只能接受字符的命令是ACCEPT.60、 對于FORENDFOR語句，短語STEP中的默認(rèn)值為1.61、 在Visual Foxpro中，程序是為了完成某一具有任務(wù)而編寫的一系列的命令和語句.62、 程序結(jié)構(gòu)是指在程序中命令或語句執(zhí)行的流程結(jié)構(gòu)。在Visual Foxpro中包括3中基本結(jié)構(gòu)：順序結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu).63、 表單也稱為屏幕或窗口.64、 Visual Foxpro中的類可以分為控件類和容器類.65、 對象

29、具有屬性、事件和方法.66、 控件的標(biāo)題屬性名為CAPTION.67、 屬性窗口中的CAPTION屬性可以設(shè)置表單的標(biāo)題.68、 在Visual Foxpro中，表單是一個容器，它可以容納Visual Foxpro的對象.69、 表單中的數(shù)據(jù)環(huán)境是一個容器，用于設(shè)置表單中使用的表、視圖和表間的關(guān)系.70、 可以將生成的快捷菜單附加到控件中，常用的方法是在控件的RIGHT CLICK事件代碼中加入命令DO快捷菜單文件名.mpr.71、 快捷菜單實(shí)質(zhì)上是一個彈出式菜單，要將某個彈出式菜單作為一個對象的快捷菜單，通常是在對象的RIGHTCLICK事件代碼中添加調(diào)用該彈出式菜單程序的命令.72、 在Visual Foxpro中，使用“菜單設(shè)計器”定義菜單，最后生成的菜單程序的擴(kuò)展名是.mpr.73、 報表的數(shù)據(jù)源可以是表、查詢、視圖.74、 在“報表設(shè)計器”中使用的控件是標(biāo)簽、域控件、線條.75、 下列選項中，不屬于報表控件的是文本框.76、 報表的數(shù)據(jù)源可以是數(shù)據(jù)庫表、視圖、查詢和臨時表.77、 報表的設(shè)計包括報表的數(shù)據(jù)源和報表的布局.78、 使用“項目管理器”的文檔選項卡管理報表.79、 為了在報表中加入一個文字說明，應(yīng)該插入一個標(biāo)簽控件.80、 在Visual Foxpro中，方法是描述對象行為的過程，屬性用來表示對象的狀態(tài).8