1、第五章 結構化程序設計一、選擇題1、WAIT命令用于讓用戶輸入一個 。A)數字 B)字符 C)字符串 D)以上都是2、在交互式輸入命令中，可以接受邏輯型數據的命令包括_。 A)INPUT和ACCEPT B)WAIT和INPUT C)INPUT和GET D)INPUT和SAY3、執行命令 ACCEPT請輸入數據:TO XYZ 時,可以通過鍵盤輸入的內容包括_。 A)字符串 B)數值和字符串C)數值,字符串和邏輯值 D)數值,字符串,邏輯值和表達式4、執行命令INPUT請輸入數據:TO AAA時,如果要通過鍵盤輸入字符串,應當使用的定界符包括_。A)單引號 B)單引號或雙引號C)單引號、雙引號或方

2、括弧 D)單引號、雙引號、方括弧或圓點5、在VFP中,可以通過鍵盤接受數值的命令有_。 A)ACCEPT B)ACCEPT和WAITC)INPUT和ACCEPT D)INPUT和 5,10 SAY.GET.6、比較WAIT、ACCEPT和INPUT三條命令，需要以回車鍵表示輸入結束的命令是_。 A)WAIT、ACCEPT、INPUT B)WAIT、ACCEPTC)ACCEPT、INPUT D)INPUT、WAIT7、以下關于ACCEPT命令的說明，正確的是_。 A)將輸入作為字符接收 B)將輸入作為數值接收C)將輸入作為邏輯型數據接收 D)將輸入作為備注型接收8、結構化程序設計所規定的三種基本

3、控制結構是_。 A)輸入,處理,輸出 B)樹型,網型,環型C)順序,選擇,循環 D)主程序,子程序,函數9、能將高級語言編寫的源程序轉換成目標程序的是_。 A)編程程序 B)編譯程序 C)解釋程序 D)鏈接程序10、VFP中的DO CASE-ENDCASE語句屬于_。 A)順序結構 B)選擇結構 C)循環結構 D)模塊結構11、當前數據庫中有五個字段:學號(C,4)、姓名(C，6)、政治(N，3.0)、英語(N，3.0)、數學(N,3.0),記錄指針指向一個非空的記錄。要使用SCATTER TO X命令把當前記錄的字段值存到數組X中,數組X _。A)不必事先定義 B)必須用DIMENSION

4、X 事先定義C)必須用DIMENSION X(5)事先定義 D)必須用DIMENSION X(1),X(2),X(3),X(4),X(5)事先定義12、要判斷數值型變量Y是否能夠被7整除,錯誤的條件表達式為_。 A)MOD(Y,7)=0 B)INT(Y/7)=Y/7 C)0=MOD(Y,7) D)INT(Y/7)=MOD(Y,7)13、在VFP中,命令文件的擴展名是_。 A)TXT B)PRG C)DBT D)FMT14、以下有關VFP中過程文件的敘述,其中正確的是_。 A)先用SET PROCEDURE TO 命令關閉原來已打開的過程文件,然后用DO 執行B)可直接用DO 執行C)先用SET

5、 PROCEDURE TO 命令打開過程文件,然后用USE 執行D)先用SET PROCEDURE TO 命令打開過程文件,然后用DO 執行15、執行 SET DEVICE TO PRINT 命令之后，能在打印機上實現輸出的命令是_。 A)?姓名 B) 10,10 SAY 姓名 C)LIST 姓名 D) 10,10 GET 姓名16、一個過程文件最多可以包含128個過程，每個過程的第一條語句是_。 A)PARAMETER B)DO C) D)PROCEDURE 17、在下列命令組合中，不能配對使用的是_。A) PROMPT 和 MENU TO B)DO WITH和 PARAMETERSC)IF

6、和 ENDIF D)DO CASE和 ENDDO18、在VFP中，用于建立或修改過程文件的命令是_。 A)MODIFY B)MODIFY COMMAND C)MODIFY PROCEDURE D)CREATE COMMAND 19、在VFP中，可以在同種類型的數據之間進行“-”(減號)運算的數據類型是_。 A)數值型、字符型、邏輯型 B)數值型、字符型、日期型C)數值型、日期型、邏輯型 D)邏輯型、字符型、日期型20、要在屏幕的第二行第二列開始顯示姓名(C,8),存款數額(N,6,2)和存入日期(D)三個字段的值,應該使用命令_。 A) 2,2 SAY 姓名,存款數額,存入日期B) 2,2 S

7、AY 姓名+存款數額+存入日期C) 2,2 SAY 姓名+STR(存款數額,6,2)+DTOC(存入日期)D) 2,2 SAY 姓名+STR(存款數額,6,2)+CTOD(存入日期)21、在DO WHILE/ENDDO循環中，若循環條件設置為.T.，則下列說法中正確的是 。A)程序無法跳出循環 B)程序不會出現死循環C)用EXIT可以跳出循環 D)用LOOP可以跳出循環22、用戶自定義函數或過程中接受參數，應使用 命令。A) PROCEDURE B) FUNCTION C)WHILE D)PARAMETERS 23、用戶自定義函數或過程可以定義在 。A)獨立的程序文件 B)對象的事件代碼、方法

8、代碼中C)數據庫的存儲過程中 D)過程文件 24、在命令窗口賦值的變量默認的作用域是 。A)全局 B)局部 C)私有 D)不一定25、使用命令DECLARE mm(2,3)定義的數組，包含的數組元素(下標變量)的個數為 。 A)2個 B)3個 C)5個 D)6個 26、下列 語句可以將變量A、B的值互換。A)A=B B)A= (A+B)/2 C)A=A+B D)A=CB=A B= (A-B)/2 B=A-B C=B A=A-B B=C27、結構化程序設計的三種基本邏輯結構是_。 A)選擇結構、循環結構和嵌套結構 B)順序結構、選擇結構和循環結構 C)選擇結構、循環結構和模塊結構 D)順序結構、

9、遞歸結構和循環結構 28、如果一個過程不包含RETURN語句，或RETURN語句中沒有指定表達式，那么該過程_。A)沒有返回值 B)返回0 C)返回.T. D)返回.F.29、作為整個應用程序入口點的主程序至少應具有以下功能_。A)初始化環境 B)初始化環境、顯示初始的用戶界面、控制事件循環，退出時恢復環境 C)初始化環境、顯示初始用戶界面 D)初始化環境、顯示初始用戶界面、控制事件循環30、下面關于過程調用的陳述中，_是正確的。A)實參與形參的數量必須相等 B)當實參的數量多于形參的數量時，出現運行時錯誤。C)當形參的數量多于實參的數量時，多余的實參為邏輯假 D)上面B和C都對 31、將內存

10、變量定義為全局變量的Visual FoxPro命令是_。A)LOCAL B)PRIVATE C)PUBLIC D)GLOBAL32、下列說法中正確的是_。 A)若函數不帶參數，則調用時函數名后面的圓括號可以省略B)函數若有多個參數，則參數名間應用空格隔開C)調用函數時，參數的類型、個數和順序不一定要一致D)調用函數時，函數名后的圓括號不論有無參數都不能省略33、在VFP中,已經建立了一個過程文件ABC.PRG,打開此過程文件的命令是 。A) OPEN PROCEDURE TO ABC B) DO PROCEDURE ABCC) SET PROCEDURE TO ABC D) RUN PROCE

11、DURE ABC34、順序鍵入以下命令： STORE 21.47TO A B=INT(&A+4) ? B 屏幕上顯示的結果為 。A)24 B)25 C)25.47 D)21.47435、設數據庫文件STD.DBF中包含8個字段，并有以下命令序列： DIMENSION DATA(10) USE STD SCATTER TO DATA ? DATA(10) 執行以上命令序列后，屏幕顯示的結果是 。A)空 B).T. C).F. D)036、有以下命令序列： STORE 123.456 TO A STORE STR(A+A,5) TO B ? LEN(B),B 執行以上命令序列,最后一條命令顯示的結

12、果是 。A)3 123 B)3 264 C)5 246 D)5 24737、給出以下程序的運行結果： SET TALK OFFX=0Y=0 DO WHILE X100?1CASE X200?2OTHERWISE?3ENDCASE若在X=300的情況下執行這個程序段，屏幕上將顯示_。A)1B)2C)12D)341、有如下命令序列: X=AY=XA=黃河長江？ X+&X-Y-&Y執行以上命令序列后，屏幕顯示表達式X+&X-Y-&Y的結果是_。A)黃河長江 B)A黃河長江A黃河長江 C)A黃河長江A D)A黃河長江黃河長江42、有如下命令序列： SET DELETED ON USE ABC GO 3

13、 DELETE NEXT 2 GO 4 RECALL USE 執行最后一條RECALL命令時，去掉刪除標記的記錄個數是_。A)0 B)1 C)2 D)343、已知proc.prg程序清單如下： proc_1.prg程序清單如下： SET TALK OFF PARAMETERS a,b n=20 b=a*b t=1 IF a=2 DO proc_1 WITH n,t RETURN ?t ENDIF SET TALK ON DO proc_1 WITH a-2,b RETURN RETURN程序proc.prg的功能是_。A)輸出20以內偶數的乘積 B)輸出20以內奇數的乘積 C)輸出結果為1 D

14、)輸出結果為044、有如下命令序列: SELECT 1USE F1SELECT 2USE F2SELECT 1SET RELATION TO RECNO()-2 INTO BGOTO 5?RECNO(2)最后一條命令的輸出結果是 。A)5 B)4 C)3 D)145、清除屏幕從10行,17列到14行,52列的正確語句是 。 A)10,17 TO CLEAR 14,52 B)10,17 CLEAR 14,52C)10,17 TO 14,52 CLEAR D)CLEAR FROM 10,17 TO 14,5246、有如下命令序列 SELECT 1USE FILE1SELECT 2USE FILE2

15、SELECT 3USE FILE 3執行以上命令序列后,要想向FILE2.DBF中追加記錄,同時保持數據庫打開的狀態不變,應當使用命令 。A) USE FILE2 B) GO FILE2 C) SELECT 2 D) SELECT 4 APPEND APPEND APPEND USE FILE2 APPEND47、有如下命令DISPLAY 姓名,出生日期 FOR 性別=女執行這個命令后,屏幕顯示的是所有性別字段值為“女”的記錄,這時文件指針_。A)指向最后一個性別為女的記錄B)指向最后一個性別為女的記錄的下一個記錄C)指向文件尾D)狀態視庫文件中數據記錄的實際情況而定48、有如下命令序列 CL

16、EAR MEMORYDIMENSION ARRAY(10)LIST MEMORY最后一條命令顯示定義的內存變量的數是 。A)10 B)1 C)0 D)1149、在命令文件中,調用另一個命令文件用命令 。 A) CALL B) LOAD C) PROCEDURE D) DO 50、執行下列語句序列 A=2200DO CASE CASE A1000 B=10/100CASE A2000 B=15/1000CASE A3000 B=20/100ENDCASE變量B的值是 。A)0.05 B)0.10 C)0.15 D)0.2051、有以下程序段:DO CASECASE 計算機=60 ?計算機成績是:

17、+及格CASE 計算機=70 ?計算機成績是:+中CASE 計算機=80 ?計算機成績是:+良CASE 計算機=90 ?計算機成績是:+優ENDCASE 設學生數據庫當前記錄的“計算機”字段的值是89,執行上面程序段之后,屏幕輸出 。A)計算機成績是:不及格 B)計算機成績是:及格 C)計算機成績是:良 D)計算機成績是:優52、執行以下命令序列: USE ZGGZ SUM 工資 FOR 工資=500 TO QWE COPY TO QAZ FIELDS 職工號,姓名 FOR 工資=500 USE QAZ NUM=RECCOUNT() AVER=QWE/NUM ? AVER最后顯示的值是 。A)

18、所有工資在500元以上的職工人數 B)所有工資在500元以上的職工平均工資數C)所有職工的平均工資數 D)出錯53、有以下程序段: 5，10 SAY 請輸入14 GET ANS READ CX=PG+ANS+.PRG DO &CX 其功能是根據用戶輸入的數字,轉去執行子程序PG1、PG2、PG3、PG4之一。但該程序段有一個明顯的錯誤,為此應當做以下修改 。A)增加STORE TO ANS 作為第一條命令B)把 5,10 SAY 請輸入14 TO ANS 命令改為 ACCEPT 請輸入14 TO ANSC)把 CX=PG+ANS+.PRG 命令中的+.PRG 部分去掉 D)把DO &CX 命令

19、的&去掉54、執行如下程序 SET TALK OFF S0 I1 INPUT N? TO N DO WHILE SN SSI II1 ENDDO ? S SET TALK ON 如果輸入N值為5,則最后S的顯示值是 。A)1 B)3 C)5 D)655、某程序中有如下程序段: STORE TO PT 5,10 SAY 是否開始打印?(Y/N): 3,10 GET PT VALID PT $YN PICTURE! READ IF PT=Y DO PT.PRG & 打印 ENDIF 如果希望程序執行后能夠實現打印輸出，則對于程序的提問 。 A)只能輸入 Y B)只能輸入y C)輸入Y或y D)可以

20、直接敲回車鍵56、執行如下程序: STORE TO ANS DO WHILE .T. CLEAR 3,10 SAY 1.添加2.刪除 3.修改 4.退出 5,15 SAY 請輸入選擇: GET ANS READ IF TYPE(ANS)=C.AND.VAL(ANS)=3.AND.VAL(ANS)0 PROG= PROG +ANS+ .PRG DO & PROG ENDIF QUIT ENDDO 如果在請輸入選擇:時，鍵入4，則系統 。A)調用子程序PROG4.PRG B)調用子程序&PROG.PRGC)返回FOXBASE提示狀態 D)返回操作系統狀態以下5762題的操作均基于下面條件：已建立學

21、生數據庫STD.DBF，數據庫結構為：學號(C,6)，姓名(C,8)，性別(C,2)，出生日期(D)，平均成績(N,6,2)。用LIST命令顯示記錄如下：記錄號#學號 姓名 性別 出生日期 平均成績1 021501劉淑敏女10/05/8488.22 021502楊立宏男03/12/8570.63 021503馬燕 女09/23/8467.24 021504趙雅潔女12/10/8480.85 021505王力軍男11/21/8490.557、依次執行以下命令： USE STD姓名=鄭小洋SKIP 2?姓名是:+姓名最后一條命令的輸出結果是 。A)姓名是：鄭小洋 B)姓名是：馬燕 C)姓名是：楊立

22、宏D)姓名是：趙雅潔58、使用INDEX ON 性別+DTOC(出生日期,1) TO RQ建立索引之后，接著執行LIST命令，所顯示記錄的姓名順序是 。 A)王力軍、楊立宏、馬燕、劉淑敏、趙雅潔B)馬燕、劉淑敏、趙雅潔、王力軍、楊立宏C)楊立宏、王力軍、趙雅潔、劉淑敏、馬燕D)劉淑敏、楊立宏、馬燕、趙雅潔、王力軍59、索引文件打開后，下列命令操作中不受索引文件影響的是 。 A) SKIPB) DISPLAY ALL C) FINDD) GO 560、有如下程序段: USE STDINDEX ON 性別 TO XBTOTAL ON性別 TO STD_1執行以上程序段之后，數據庫STD_1.DBF

23、中的記錄個數為 。A)1B)2C)3D)461、上題所生成的數據庫STD_1.DBF中被匯總的字段是 。 A)記錄個數 B)平均成績 C)平均成績、出生日期 D)平均成績、出生日期、記錄個數62、要顯示當前記錄的學號，姓名，性別，以下命令錯誤的是 。 A) ? 學號,姓名,性別 B) DISPLAY學號,姓名,性別C) 5,10 SAY學號,姓名,性別 D) 5,10 SAY學號+姓名+性別二、填空題1、PUBLIC用于定義 。在本次Visual FoxPro運行期間，所有過程都可以使用這些變量。2、VFP根據表達式的 來確定表達式的類型。3、命題“n是小于正整數k的偶數”用邏輯表達式表示是

24、。4、PRIVATE用于定義 ，它用于定義當前過程的變量，并將以前過程定義的同名變量保存起來，在當前過程中使用該變量而不影響這些同名變量的原始值。 5、有程序段如下: STORE 0 TO X,Y DO WHILE.T. X=X+1 Y=Y+X IF X=100 EXIT ENDIF ENDDO ? Y=+STR(Y,3) 這個程序是計算 1 的,執行后的結果是 2 。6、請閱讀下列判斷一個自然數是否為質數的程序，并將程序填寫完整。SET TALK OFFINPUT請輸入一個大于1的自然數:TO NK=0 &K的值為0表示所輸入的自然數是質數,為1表示不是質數J=2DO WHILE JN IF

25、 MOD(N,J) 1 2 LOOP ELSE K=1 EXIT ENDIFENDDOIF K=0 ? 3 + 是質數 ENDIF ? 再見！SET TALK ONRETURN7、下面的函數通過參數a、b、c接收一元二次方程ax2+bx+c=0的三個系數，并求解這個方程:如果有實根,通過參數x1和x2返回它的兩個根，函數的返回值為.T.；如果沒有實根或出現其他異常情況，函數的返回值為.F.，請填空。PARAMETERS a,b,c,x1,x2 IF a =0 RETURN .F. ENDIF Delta=b*b-4*a*c IF deltaPMAXPMAX= TEMP(I)CASE TEMP(

26、I)PMINPMIN= TEMP(I) 3 ENDDOSELECT GSREPLACE 最后得分 WITH 4 5 6 ENDDO2)將GS.DBF按“最后得分”字段由高到低排序，“最后得分”相同時，按歌手編號升序建立排序文件GSPX.DBF的命令是 。3)計算GS.DBF中所有歌手“最后得分”的平均值，并將結果保存在變量PJ中的命令是 。4)以下程序是根據GS.DBF中“選送地區”字段的前兩個漢字是否為“北京”而使用PROG1.PRG和PROG2.PRG進行不同的處理：IF LEFT(選送地區,4)=北京DO PROG1ELSEDO PROG2ENDIF以上程序段中的判斷條件LEFT(選送地

27、區，4)=北京，也可以用函數SUBSTR或AT描述。使用SUB函數描述時，判斷條件可改寫為 1 ；使用AT函數描述時，判斷條件可改寫為 2 。11、有如下售書數據庫BOOK.DBF，BOOK.DBF中的記錄如下：書號 單價 數量 總計B0168 19.8 3B6915 12.6 36B9023 40.0 100B4682 18.0 40B6329 28.0 56B8127 2.0 20要逐條計算總計并填入“總計”字段之中,計算按照如下規則:若數量小于等于10,總計等于“單價*數量”若數量大于50, 總計等于“單價*數量*(1-5/100)”若數量在11與50之間,總計等于“單價*數量(1-10

28、/100)”請填空:SET TALK OFFUSE BOOKGO TOPDO WHILE 1 DO CASECASE 數量50REPLACE 總計 WITH 單價*數量*(1-5/100) ENDCASE 3 ENDDOLISTUSESET TALK ONRETURN12、售書數據庫BOOK.DBF(如上題所示),現需要調整一些書的單價,然后用調整后的“單價*數量”的值填入“總計”字段，下邊程序的功能是根據用戶輸入的書號查找到記錄,并由用戶決定是否對該記錄進行修改，請填空：SET TALK OFFUSE BOOKINDEX ON 書號 TO BOOKIDO WHILE .T.CLEARDISP

29、 ALL FIELDS 書號ACCEPT請輸入書號TO BNO 1 IF FOUND()DISPLAYACCEPT修改/不修改繼續/終止程序(Y/N/E) TO SRELSEACCEPT書號不存在!繼續/終止程序(N/E) TO SRENDIFDO CASECASE UPPER(SR)=YINPUT請輸入新單價: TO XDJREPLACE 2 ,總計 WITH 單價*數量 CASE UPPER(SR)=N 3 CASE UPPER(SR)=E 4 ENDCASEENDDOUSESET TALK ONRETURN13、下面程序的功能是修改P2.DBF中記錄內容，為了避免破壞數據庫數據,先把記錄

30、內容存入數組BUFFER中,用戶先對數組進行修改,確定修改后,再把數組中的數據存入數據庫中，請填空：SET TALK OFFDIMENSION BUFFER(3)STOREYTO ANS, CONUSE P2DO WHILE UPPER(CON)=YCLEAR 2,5 SAY修改第幾條記錄? 1 GO RNOSCATTER TO BUFFER 4,10 SAY學號GET BUFFER(1) 6,10 SAY姓名GET BUFFER(2) 8,10 SAY所屬系GET BUFFER(3) 2 ACCEPT確實修改記錄嗎?(Y/N)TO ANSIF UPPER(ANS)=Y 3 ENDIFACCEPT繼續嗎?(Y/N)TO CONENDDOUSESET TALK ONRETURN14、設有Student.DBF(學號，姓名，民族)和scor