回 帖 发 新 帖 刷新版面

主题:[讨论]这段vfp程序求指点

set talk off
 clear
 a=1
 do while a<=9  
 b=1 
    do while b<=9    
  z=a*b
  ??str(a,1)+"x"+str(b,1)+"=" +str(z,2)+" "
  b=b+1
    enddo
    a=a+1
  enddo
  ?
  set talk on
    
这是一段九久乘法表的代码
怎么样使它成倒三角呢?

*********
********
*******
******
*****
****
***
**
*

回复列表 (共3个回复)

沙发

set talk off
CLEAR
ks=9
FOR a=1 TO 9
    zf=''
    FOR b=ks TO 1 STEP -1
        zf=zf+'*'
    ENDFOR
    ks=ks-1
    ?zf
ENDFOR
WAIT
CLEAR
set talk on

板凳

set talk off
clear
FOR i=1 TO 9
    ?REPLICATE("*",i)
next

3 楼

你好.我是全职网赚工作者.
如果你有时间有电脑.
想在网络上创业.请联系我..
项目绝对真实.详情QQ空间资料
加盟请联系 QQ908889846

我来回复

您尚未登录,请登录后再回复。点此登录或注册