使用VFP编程输出如下*星形图案。如何编写？

for i=1 to 4

??space(7-(i*2-1)) &&左侧空做谈格

for j=1 to 2*i-1

?? "乱胡清*"+" " && "*"+" "

endfor

? && 换行哗前

endfor

clear

dime a(3,5)

for i=1 to 3

?space(40-i)

for j=1 to 2*i-1

if j=i or j=2*i-1

a(i,j)="穗茄码A"纳答

endif

if j<猜哪=i

a(i,j)=chr(64+j)

a(i,2*i-j)=a(i,j)

endif

??a(i,j)

endfor

endfor

cancel

---