笔试读程序题分析(18-29)CP18.docVIP

笔试题读程序分析（S18-29） 循环 18.1 计数循环 套IF mod 累加器 CLEAR M 0 FOR X 1 TO 10 IF MOD X,3 0 M M+X ENDIF ENDFOR ? M RETU 1 程序的功能是 A 求1-10之间能被3 整除数的个数 B 求1-10之间能被3 整除数的和 . C 求1-10之间不能被3 整除数的个数 D 求1-10之间不能被3 整除数的和 2 程序的结果是 A 3 B 10 C 18 . D 37 18.5 类似26.1 表扫描型 循环 套IF选择 库表、 自由表 指针位置 CLEAR OPEN DATABASE emplorer USE compen SCAN FOR RECNO 10 IF 姓名 ”李强” LOOP ENDIF 姓名,实发工资 ENDSCAN USE CLOSE DATA 1 compen是 A 自由表 B 数据库表 C 数据库 D 可能是自由表，也可能是数据库表 . 2 若数据库有50条记录，则程序功能为 A 前10条记录中搜索“李强”的记录 B 列出前10条记录 C 每10条记录一屏显示记录，但不显示“李强”的记录 D 列出前10条记录，但不显示“李强”的记录 . 3 循环结束后，记录指针指向 A 第1条记录 B 最后1条记录 C 第10条记录 D 最后1条记录加1 . 19.1 条件循环 屏幕坐标 计数器 CLEAR ALL STORE 1 TO J, K DO WHILE K 5 ＠J, K SAY “*” K K+1 ENDDO RETU 屏幕（显示）的起始坐标为 A l，5 B 0，0 C l，l . D 任意 程序执行后J，K的值是 A l，5 . B 5，5 C 0，0 D l，l0 19.2 条件循环 功能 循环变量值 设XS.DBF有10条记录 USE XS GO BOTTOM N 3 DO WHILE N l DISPLAY SKIP -l WAIT N N-1 ENDDO USE RETU 程序的功能是 A 显示所有记录 B 分别显示前3个记录 C 显示第3个记录 D 分别显示后3个记录 . 退出循环后，N的值是 A 0 . B l C 3 D 4 20.1 绝对循环 功能 计数器 累加器 （初值， 位置） store 0 to h,k do while .t. k k+1 h＝h+k if k 10 exit endif enddo ?＂h ＂+str h,4 return 1 该程序的功能是 A 计算1-10的整数之和 . B 计算1-9的整数之和 C 计算1-1l的整数之和 D 计算1-10以内的数之和 2 该程序运行的结果是 A 55 B 66 C h 55 . D h 66 22.1 计数循环 套IF 数位值 FOR K 100 TO 400 A INT K/100 B INT K-100*A /10 C K-INT K/10 *10 IF K 100*C+10*B+A K ENDIF ENDFOR / RETU 1 程序完成的功能是 A 显示100-400之间所有既能被10整除又能被100整除的数 B 显示100-400之间所有能被10整除的数 C 显示100-400之间所有能被100整除的数 D 显示100-400之间所有百位与个位交换后其值相等的数 . 2 能代替B INT K-100*A /10 这条命令的是 A B VAL LEFT STR K,3 ,1 B B VAL SUBSTR STR K,3 ,2,1 . C B VAL RIGHT STR K,3 ,1 D 上述选择都不正确 3 IF K 100*C+10*B+A / ? K / ENDIF 这段程序的功能是 A 判断K是否等于A,B,C三个数的和,如果是则显示K B 判断K是否等于个位与百位交换后的值,如果是则显示K . C 判断A,B,C三个数是否为整数,如果是则显示K D 上述选择都不正确 4 将” IF K 100*C+10*B+A ” 语句替换为 ”IF K A*A*A+B*B*B+C*C*C ”程序完成的功能是 A 将100-400之间能被100整除的数显示 B 将100-400之间能被10整除的数显示 C 将100-400之间该数的每位的立方和等于