黄色在线观看视频-黄色在线免费看-黄色在线视频免费-黄色在线视频免费看-免费啪啪网-免费啪啪网站

(11) 有如下程序
a$=”A WORKER IS OVER THERE”
x=LEN(a$)
FOR i=1 TO x-1
b$=MID$(a$,i,2)
IF b$=”ER” THEN s=s+1
NEXT i
PRINT s
END
運(yùn)行后的輸出結(jié)果是 [11]

(12) 以下程序是在鍵盤上輸入月份的數(shù)值，即1～12之間的一個整數(shù)，計算機(jī)即打印出該月份的季節(jié)(12，1，2為冬季，其余類推)。比如輸入7，則打印出Summer,但程序不完整，請在 [12] 處補(bǔ)充完整。
DO
INPUT”The number of month --“;n
LOOP UNTIL n>0 AND n<13
m= [12]
SELECT CASE m
CASE 1
PRINT”Spring”
CASE 2
PRINT “Summer”
CASE 3
PRINT”Autumn”
CASE ELSE
PRINT”Winter”
END SELECT
END

(13) 下面的程序是用選擇交換法將n個數(shù)排為升序，請在 [13] 、 [14] 、 [15] 處將程序補(bǔ)充完整。(6分)
INPUT”Enter a number:”;n
DIM a(n)
FOR i=1 TO n
INPUT a(i)
PRINT a(i);
NEXT i
PRINT
FOR i= [13]
k=i
FOR j= [14]
IF a(k)>a(j) THEN k=j
NEXT j
IF k<>i THEN [15]
NEXT i
FOR i=1 TO n
PRINT a(i);
NEXT i
PRINT
END

(14) 下面程序的功能是從一個順序文件”emp.txt”中讀入員工姓名、年齡及工資，然后將各員工的工資按400元以下、1000元以下及更高分為低、中、高分別統(tǒng)計三類工資的員工人數(shù)。請在程序的[16]、[17]、[18]三處補(bǔ)充所需內(nèi)容使之完整。
OPEN”emp.txt” FOR [16] AS#1
DO WHILE NOT EOF(1)
[17] name$,age,wage
SELECT CASE wage
CASE<400
low=low+1
CASE<1000
middle=middle+1
[18]
high=high+1
END SELECT
LOOP
CLOSE #1
PRINT”low=”;low;”Middle=”;middle;”High=”;high
END

(15) 下面程序的功能是產(chǎn)生100個小于1000(不含1000)的隨機(jī)正整數(shù)，并統(tǒng)計其中5的倍數(shù)所占比例，但程序不完整，請在 [19] 及 [20] 處把程序補(bǔ)充完整。
DIM a(100)
FOR j=1 TO 100
a(j)=INT( [19] )
IF a(j) [20] 5=0 THEN k=k+1
PRINT a(j);
NEXT j
PRINT
PRINT k/100
END