华南俳烁实业有限公司

　　讀程序?qū)懗鲞\(yùn)行結(jié)果 (每小題4分，共20分)

　　1. 有一程序如下，寫出運(yùn)行結(jié)果：

　　SET TALK OFF

　　CLEAR

　　STORE 1 to f1,f2

　　FOR k=1 to 4

　　?f1,f2

　　f1=f1+f2

　　f2=f2+f1

　　ENDFOR

　　RETURN

　　2. 設(shè)有一學(xué)生成績(jī)數(shù)據(jù)表XSCJ.DBF如下，寫出下面程序的運(yùn)行結(jié)果。

　　學(xué)號(hào) 課程號(hào) 學(xué)期 考試成績(jī) 補(bǔ)考成績(jī)

　　1999013001 01601 6 86.0

　　2000100723 10312 4 91.0

　　1998205134 20734 8 70.0

　　1999120815 12915 6 89.0

　　1999013001 60623 6 55.0 78.0

　　1999013001 60101 8 75.0

　　2000221005 22510 4 53.0 80.0

　　SET TALK OFF

　　CLEAR

　　USE XSCJ

　　k=0

　　DO WHILE .NOT. EOF()

　　IF 學(xué)號(hào)="1999013001"

　　If k=0

　　? 學(xué)號(hào),課程號(hào),iif(考試成績(jī)<60,補(bǔ)考成績(jī)，考試成績(jī)),“—”

　　k=k+1

　　else

　　?? 課程號(hào), iif(考試成績(jī)<60,補(bǔ)考成績(jī)，考試成績(jī)),“—”

　　endif

　　endif

　　SKIP

　　ENDDO

　　USE

　　Return

　　3. 已知cTest=”hello2008,Luck5688PIG”,寫出以下程序的運(yùn)行結(jié)果：

　　SET TALK OFF

　　CLEAR

　　cNumOnly = "" &&空串

　　FOR nCnt = 1 TO LEN(cTest)

　　cCharacter = SUBSTR(cTest, nCnt, 1)

　　IF ISDIGIT(cCharacter)

　　cNumOnly = cNumOnly + cCharacter

　　ENDIF

　　ENDFOR

　　? cNumOnly

　　return

　　4. 寫出以下程序運(yùn)行的結(jié)果：

　　SET TALK OFF

　　Local i PROCEDURE M2

　　i=8 Parameters j

　　C1="計(jì)算機(jī)等級(jí)考試" do while j>=i

　　DO M1 ?? substr(cd , j , 2)

　　? 1998+i, right(C1,i ) j=j-2

　　RETURN enddo

　　?? C1

　　PROCEDURE M1 i=4

　　PUBLIC cd RETURN

　　i=1

　　cd="校高市慶重"

　　do M2 with 9

　　RETURN

　　5. 有兩個(gè)數(shù)據(jù)表文件，其內(nèi)容如下：

　　學(xué)生成績(jī)表CJ.DBF： 學(xué)生學(xué)號(hào)、姓名對(duì)照表XM.DBF：

　　學(xué)號(hào) 科目 成績(jī) 學(xué)號(hào) 姓名

　　99011 馬列原理 70 99011 張三

　　99013 馬列原理 85 99012 李四

　　99012 馬列原理 65 99013 王五

　　99012 英語(yǔ) 70

　　99011 英語(yǔ) 85

　　99013 英語(yǔ) 70

　　執(zhí)行以下程序段，寫出運(yùn)行結(jié)果：

　　set talk off

　　sele a

　　use xm

　　inde on 學(xué)號(hào) to xh

　　sele b

　　use cj

　　inde on 學(xué)號(hào)to cj1

　　set rela to 學(xué)號(hào) into a

　　list off 學(xué)號(hào),a->姓名,科目,成績(jī) for right (學(xué)號(hào),2)=”12”

　　close data

　　return

　　1. 1 1

　　2 3

　　5 8

　　13 21

　　2. 1999013001 01601 86.0 – 60623 78.0 – 60101 75.0 --

　　3. 20085688

　　4. 重慶市高校計(jì)算機(jī)等級(jí)考試

　　2006 等級(jí)考試

　　5. 學(xué)號(hào) 姓名 科目 成績(jī)

　　99012 李四 馬列原理 65

　　99012 李四 英語(yǔ) 70