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

使用VFP编程输出如下*星形图案。如何编写?,第1张

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


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12555894.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-26
下一篇 2023-05-26

发表评论

登录后才能评论

评论列表(0条)

保存