有趣的九九乘法表敲门砖

lodylanshu

想看的自己看看，比较完美的显示

超自然

恩,显示比较工整,不过代码有些繁琐,比如其中有继续之类是可以不要的,而且这种场合用for来造成循环会比while好用些
另外刚才无聊,改了个不使用循环语句的写法,有兴趣可以看看,希望对你有帮助

lodylanshu

恩,显示比较工整,不过代码有些繁琐,比如其中有继续之类是可以不要的,而且这种场合用for来造成循环会比while好用些
另外刚才无聊,改了个不使用循环语句的写法,有兴趣可以看看,希望对你有帮助
[/attach......
超自然 发表于 2013-10-11 21:30:16

通过观察你的代码，我有几点疑问：
    --你的思路是FOR循环没错，但是为啥要两个FOR循环来做关联循环体？
    --下面是你的代码被我改变后的结构，一样可以实现你原来代码的效果，你看看怎么样？
    --其次，你的两个互相关联的FOR循环体的关系是什么？

空间 乘法口诀
//默认空间
//开始按钮_点击操作
功能 开始_点击()
    var z=1
    乘法口诀.乘法表2(1,1,z)
功能结束
功能 乘法表1(被乘数,乘数,&乘积)
    如果(字符串.长度(被乘数*乘数)==1)
        编辑框.设置文本("编辑框0",编辑框.获得文本("编辑框0")&乘数&"*"&被乘数&"="&被乘数*乘数&"     ")
    否则
        编辑框.设置文本("编辑框0",编辑框.获得文本("编辑框0")&乘数&"*"&被乘数&"="&被乘数*乘数&"   ")
    如果结束
    如果(乘数==被乘数)
        编辑框.设置文本("编辑框0",编辑框.获得文本("编辑框0")&"\r\n")
        乘积++
        乘法口诀.乘法表2(乘积,1,乘积)
    否则
        乘法口诀.乘法表1(被乘数,乘数+1,乘积)
    如果结束
功能结束
功能 乘法表2(被乘数,乘数,&乘积)
    如果(被乘数>9)
        返回 0
    否则
        乘法口诀.乘法表1(被乘数,乘数,乘积)
    如果结束
功能结束
功能 退出_点击()
    辅助.退出()
功能结束
空间结束
//空间结束语句

lodylanshu

恩,显示比较工整,不过代码有些繁琐,比如其中有继续之类是可以不要的,而且这种场合用for来造成循环会比while好用些
另外刚才无聊,改了个不使用循环语句的写法,有兴趣可以看看,希望对你有帮助
[/attach......
超自然 发表于 2013-10-11 21:30:16

老实说看了你的代码它的本意还是FOR循环体。。。

lodylanshu

另外我声明：“TC不支持FOR循环体系函数！！"

lodylanshu

for语句在TC中不可以直接使用，而你的那套代码，怎么看怎么像for循环  我记得VC里的for是 FOR(表达式1;表达式2;表达式3)的形式
   用这个VC的for可以这样
   ------FOR(I=0;I<9;I++)
                  FOR(J=0;J<9;J++)
                        INPUT(CTR(I)&"*"&CTR(J)&"="&CTR(I*J))


这个可以在按键精灵中使用到的代码

超自然

首先，提到for只是一个建议，并不是非它不可
其次，TC当然有for
再则，我用的不是for，更不是While，
那是在递归，双套是乘数和被乘数各自在递归

lodylanshu

参数在两个功能里传递？