set talk off
CLEAR
FOR I=1 TO 7
if I<=4
? SPACE(10-i)
FOR J=1 TO i
?? '* '
ENDFOR
else
? SPACE(6+I-4)
FOR J=1 TO 8-i
?? '* '
ENDFOR
endif
ENDFOR
Return
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024