运行以下程序后,输出的图案是( )。 Forml.Cls AS:StringS(10,“*”) For i=1 To 5 n=10-2*i XS=AS:Y$=SpaceS(n) Mid$(X$,i+1,n)=Y$ Pr

admin2020-02-27  31

问题 运行以下程序后,输出的图案是(    )。
Forml.Cls
AS:StringS(10,“*”)
For i=1 To 5
    n=10-2*i
    XS=AS:Y$=SpaceS(n)
    Mid$(X$,i+1,n)=Y$
    PrintX$
Next;

选项 A、*    *
    **    **
    ***    ***
    ****    ****
    **********
B、    **********
    **********
  **********
**********
**********
C、*********
    *******
    *****
    ***
    **
D、**********
   ********
    ******
    ****
    **

答案A

解析 本题考查循环程序的分析。本程序首先在字符串A中存放10个“*”号。指定循环输出5行;每次循环输出第i行时,把字符串中从i+1开始的n个字符替换成n个空格。根据“n=10-2*i”语句,n的变化为8、6、4、2、0。
转载请注明原文地址:https://kaotiyun.com/show/MjTp777K
0

最新回复(0)