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

admin2019-06-20  29

问题 运行以下程序后,输出的图案是(    )。
    Form1.Cls
    AS=StringS(10,"*")
    For i=1 To 5
    n=10-2*i
    X$=AS:Y$=Space$(n)
    Mid$(X$,i+1,n)=Y$
    Print X$
    Next i

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


答案A

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

最新回复(0)