CLEAR
n=5
FOR i=1 TO n
str1=""
FOR j=1 TO i
str1=str1+"* "
ENDFOR
?SPACE(n-i)+str1
ENDFOR
?
*********************************
n=9
m=0
FOR i=n TO 1 STEP -2
str1=""
FOR j=1 TO i
str1=str1+"* "
ENDFOR
?SPACE(m)+str1
m=m+2
ENDFOR
?
*************************************
n=9
m=0
chrn=65
FOR i=n TO 0 STEP -2
str1=""
FOR j=1 TO i
str1=str1+CHR(chrn)
ENDFOR
?SPACE(m)+str1
m=m+1
chrn=chrn+1
ENDFOR
?
**************************************
n=5
FOR i=1 TO n
str1=""
FOR j=1 TO i
str1=str1+STR(j,1)
ENDFOR
?str1
ENDFOR
?
**************************************
?"1"
n=4
l=11
FOR i=1 TO n
m=l
FOR j=1 TO i-1
m=m*l
ENDFOR
?ALLTRIM(STR(m))
ENDFOR
