
展开全部
倒三角形
CLEAR
INPUT "请输入三角形的边长:" TO N
*用INPUT命令输入边长存放到变量N中
?
FOR I=N TO 1 STEP -1
*循环变量I控制行,从N到1
??SPACE(20-I) &&输出20-I个空格
FOR J=1 TO 2*I-1
*循环变量J控制列,输出2*I个*
??"*"
ENDFOR
? &&换行
ENDFOR
RETURN
CLEAR
INPUT "请输入三角形的边长:" TO N
*用INPUT命令输入边长存放到变量N中
?
FOR I=N TO 1 STEP -1
*循环变量I控制行,从N到1
??SPACE(20-I) &&输出20-I个空格
FOR J=1 TO 2*I-1
*循环变量J控制列,输出2*I个*
??"*"
ENDFOR
? &&换行
ENDFOR
RETURN
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询