当前所在位置：珠峰网资料 >> 计算机 >> 计算机等级考试 >> 正文
最新资料
最新课程
最新资讯
最新机构
资讯导航
综合指导：计算机二级笔试试题二（11）
发布时间：2010/10/20 16:42:17 来源：www.xue.net 编辑：城市总裁吧

    14)有如下程序

    a$="ABCD"

    FOR m=1TO 4

    PRINT TAB(5-m);[16]------

    NEXT m

    END

    运行后的输出结果如下

    D

    CD

    BCD

    ABCD

    但程序不完整,请在[16] 处补充使之完整。

    ------

    (15)有如下程序

    DECLARE SUB p(k,s)sum=0

    FOR j=1TO 3

    CALL P(j,s)

    sum=sum+5

    NEXT j

    PRINT sum

    END

    SUB p(k,s)

    s=1

    FOR m=1TO k

    s=s*m

    NEXT m

    END SUB

    运行后输出sum的值是[17] 。

    ------

    (16)有如下程序

    abc$="The People's Democratic Republic of Yemen"m=LEN(abc$)

    FOR j=1TO m

    b$=MID$(abc$,j,1)IF b$="e"OR b$="o"THEN x=x+1NEXT j

    PRINT x

    END

    运行后输出x的值是[18] 。

    ------

    (17)下面程序的功能是产生100个不同的在-300到300(含-300和300)之间的随机整数,但程序不完整,请在[19] 和[20] 处把程序补充完整。

    ------------

    DIM b(100)

    FOR j=1TO 100DO

    IF RND<.5THEN a=-1ELSE a=1b(j)=[19]*INT(301*RND)flag=1

    FOR k=1TO [20]IF b(j)=b(k)THEN flag=0NEXT k

    LOOP UNTIL flag=1PRINT b(j);

    NEXT j

    END

最新课程

计算机
广告合作：400-664-0084 全国热线：400-664-0084
Copyright 2010 - 2017 www.my8848.com 珠峰网 粤ICP备15066211号
珠峰网 版权所有 All Rights Reserved