输出图形_字母三角形_1

作者在 2021-04-07 22:56:13 发布以下内容
*     A
*    BCD
*   EFGHI
*  JKLMNOP
* QRSTUVWXY

CLEAR 
ln = 0
FOR ln1 = 1 TO 5
    ? SPACE(5 - ln1)
    FOR ln2 = 1 TO 2 * ln1 - 1
        ln = ln + 1
        ?? CHR(ln + 64)
    ENDFOR
ENDFOR
默认分类 | 阅读 560 次
文章评论,共0条
游客请输入验证码
文章分类
最新评论