中職VF課堂練習(xí)習(xí)題

1、四、程序填空 (每空3分，共18分)1下面的程序功能是完成工資查詢，請(qǐng)?zhí)羁眨篠ET TALK OFFUSE employeeACCEPT "請(qǐng)輸入職工號(hào)" TO numLOCATE FOR 職工號(hào) = numIF _ NOT EOF()_DISPLAY 姓名, 工資ELSE "職工號(hào)輸入錯(cuò)誤！"ENDIFUSESET TALK ON2有學(xué)生數(shù)據(jù)表，其中“編號(hào)”字段( N, 2, 0 )的值從1開始連續(xù)排列。以下程序欲按編號(hào)的1, 7, 13, 19, 的規(guī)律抽取學(xué)生參加比賽，并在屏幕上顯示參賽學(xué)生編號(hào)，請(qǐng)?zhí)羁铡?USE STUDENT DO WHILE

2、.NOT. EOF( )IF MOD _ (編號(hào),6)=1_ 編號(hào)ENDIFSKIPENDDoUSE3下列程序的功能是根據(jù) “銷售” 表中的數(shù)據(jù)去修改 “庫存.dbf” 表的數(shù)據(jù)，請(qǐng)?zhí)羁?。SELECT 1USE庫存SELECT 2USE銷售DO WHILE NOT EOF（） SELECT 1LOCATE FOR 商品名=B.商品名REPLACE 數(shù)量 WITH 數(shù)量-B.數(shù)量,總金額 WITH 單價(jià)*數(shù)量SELECT 2 SKIP ENDDOCLOSE DATABASE4下列程序是判斷任意整數(shù)(>2)是否為素?cái)?shù)，請(qǐng)?zhí)羁铡＃ㄌ崾荆喝绻粋€(gè)整數(shù)N能被2之間的任一整數(shù)整除，則這個(gè)整數(shù)N不是素

3、數(shù) SET TALK OFFINPUT "輸入一個(gè)整數(shù)：" TO NFOR I=2 TO SQRT(n) IF _ MOD(N,I)=0_ （或N/I=INT（N/I）EXITENDIFENDFORIF _ I>SQRT(n)_ N, "是素?cái)?shù)"ELSE N, "不是素?cái)?shù)"ENDIFRETURNSET TALK ON1、寫出下列程序的輸出結(jié)果是： 9 3 x=1 y=3 DO sub WITH x,(y),5 x,y RETURN PROCEDURE sub PARAMETER a,b,c a=a+b+c b=a+b-c RET

4、URN 2下列程序執(zhí)行時(shí)，在鍵盤上輸入21，則屏幕上的顯示結(jié)果為_ OK1INPUT "X=" TO XDO CASECASE X > 10 "OK1"CASE X > 20 "OK2"OTHERWISE "OK3"ENDCASE3設(shè)數(shù)據(jù)表文件中有兩條記錄，內(nèi)容如下：運(yùn)行以下程序的結(jié)果應(yīng)當(dāng)是。RECORD#XMZF1李四2張三USE CJX = 0DO WHILE .NOT. EOF( )X= X + ZFSKIPENDDO XRETURN4執(zhí)行如下程序，如果輸入N值為5，則最后顯示值是_6 4_。SET TALK OFFS = 0I = 0INPUT "N=" T