(完整版)中職VF課堂練習(xí)題(20210206151821)

1、四、程序填空(每空3分，共18分)SKIPENDDo1 下面的程序功能是完成工資查詢(xún)，請(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ù)表ST.ddbf,其中“編號(hào)”字段(N, 2, 0 )的值 從1開(kāi)始連續(xù)排列。以下程序欲按編號(hào)的1, 7, 13, 19,的規(guī) 律抽取學(xué)生參加比賽，并在屏幕上顯示參賽學(xué)生編號(hào)，請(qǐng)?zhí)?空。USE STUDENTDO WHILE .NOT. EOF() I

2、F MOD _ (編號(hào),6)=1 ?編號(hào)ENDIFUSE3下列程序的功能是根據(jù)“銷(xiāo)售”表中的數(shù)據(jù)去修改“庫(kù)存.dbf”表的數(shù)據(jù)，請(qǐng)?zhí)羁?。SELECT 1USE庫(kù)存SELECT 2USE銷(xiāo)售DO WHILE NOT EOF () SELECT 1LOCATE FOR商品名=B.商品名REPLACE數(shù)量 WITH 數(shù)量-B.數(shù)量,總金額 WITH單價(jià)*數(shù)量SELECT 2SKIPENDDOCLOSE DATABASE4下列程序是判斷任意整數(shù)(2)是否為素?cái)?shù)，請(qǐng)?zhí)羁铡?提示： 如果一個(gè)整數(shù)N能被2.n之間的任一整數(shù)整除，則這個(gè)整 數(shù)N不是素?cái)?shù)SET TALK OFFINPUT 輸入一個(gè)整數(shù)：TO N

3、FOR 1=2 TO SQRT( n)IF _ MOD(N,I)=0EXIT(或 N/I=INT (N/I)ENDIFENDFORIFSQRT( n)_? N,是素?cái)?shù)ELSE? N,不是素?cái)?shù)”ENDIFRETURNSET TALK ONb=a+b-cRETURN2.下列程序執(zhí)行時(shí)，在鍵盤(pán)上輸入21,則屏幕上的顯示結(jié)果為OK1INPUT X= TO XDO CASECASE X 10? OKICASE X 20? OK2OTHERWISE? OK3ENDCASE1寫(xiě)出下列程序的輸出結(jié)果是：9 3x=1y=3DO sub WITH x,(y),5? x,yRETURN3設(shè)數(shù)據(jù)表文件CJ.DBF中有兩條記錄，內(nèi)容如下：運(yùn)行以 下程序的結(jié)果應(yīng)當(dāng)是一1100.00_。RECORD#XMZF1李四500.002張三600.00PROCEDURE subPARAMETER a,b,ca=a+b+cUSE CJX = 0DO WHILE .NOT. EOF()X= X + ZFSKIPENDDO? XRETURN4執(zhí)行如下程序，如果輸入 N值為5,則最后顯示值是6 4_0SET TALK OFFS = 0I = 0INPUT N= TO N