给孩子写的加减乘除练习程序

prettyafei

@樱兰
数学老师整天让家长给孩子出题，抄题。
孩子做着也烦躁。
索性给孩子做个小工具，在电脑上多练习一下。
有时间再继续完善一下。
业余时间看了看文档，视频，也没有深入学习。
大神勿笑

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
位数	整数型
加数	整数型
被加数	整数型
结果	整数型
乘数	整数型
被乘数	整数型
除数	整数型
被除数	整数型
减数	整数型
被减数	整数型

子程序名	返回值类型	公开	备 注
_加法位数确定_被单击

位数 ＝ 到整数 (加法位数.内容)
如果真 (位数 ＞ 3)
信息框 (“太大的数值运算不合适孩子练习。”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
_加法出题_被单击

如果真 (位数 ＝ 1)
加数 ＝ 取随机数 (1, 10)
加法加数.内容 ＝ 到文本 (加数)
被加数 ＝ 取随机数 (1, 10)
加法被加数.内容 ＝ 到文本 (被加数)
返回 ()
如果真 (位数 ＝ 2)
加数 ＝ 取随机数 (10, 100)
加法加数.内容 ＝ 到文本 (加数)
被加数 ＝ 取随机数 (10, 100)
加法被加数.内容 ＝ 到文本 (被加数)
返回 ()
如果真 (位数 ＝ 3)
加数 ＝ 取随机数 (100, 1000)
加法加数.内容 ＝ 到文本 (加数)
被加数 ＝ 取随机数 (100, 1000)
加法被加数.内容 ＝ 到文本 (被加数)
返回 ()

子程序名	返回值类型	公开	备 注
_加法提交按钮_被单击

结果 ＝ 加数 ＋ 被加数
如果真 (到整数 (加法结果.内容) ＝ 结果)
信息框 (“计算正确，再接再厉”, 0, , )
加法加数.内容 ＝ “”
加法被加数.内容 ＝ “”
加法结果.内容 ＝ “”
返回 ()
信息框 (“计算错误，再仔细计算一下”, 0, , )

子程序名	返回值类型	公开	备 注
_乘法位数确定_被单击

位数 ＝ 到整数 (乘法位数.内容)
如果真 (位数 ＞ 3)
信息框 (“太大的数值运算不合适孩子练习。”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
_乘法出题_被单击

如果真 (位数 ＝ 1)
乘数 ＝ 取随机数 (1, 10)
乘法乘数.内容 ＝ 到文本 (乘数)
被乘数 ＝ 取随机数 (1, 10)
乘法被乘数.内容 ＝ 到文本 (被乘数)
返回 ()
如果真 (位数 ＝ 2)
乘数 ＝ 取随机数 (10, 100)
乘法乘数.内容 ＝ 到文本 (乘数)
被乘数 ＝ 取随机数 (10, 100)
乘法被乘数.内容 ＝ 到文本 (被乘数)
返回 ()
如果真 (位数 ＝ 3)
乘数 ＝ 取随机数 (100, 1000)
乘法乘数.内容 ＝ 到文本 (乘数)
被乘数 ＝ 取随机数 (100, 1000)
乘法被乘数.内容 ＝ 到文本 (被乘数)
返回 ()

子程序名	返回值类型	公开	备 注
_乘法提交按钮_被单击

结果 ＝ 乘数 × 被乘数
如果真 (到整数 (乘法结果.内容) ＝ 结果)
信息框 (“计算正确，再接再厉”, 0, , )
乘法乘数.内容 ＝ “”
乘法被乘数.内容 ＝ “”
乘法结果.内容 ＝ “”
返回 ()
信息框 (“计算错误，再仔细计算一下”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
_减法位数确定_被单击

位数 ＝ 到整数 (减法位数.内容)
如果真 (位数 ＞ 3)
信息框 (“太大的数值运算不合适孩子练习。”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
_减法出题_被单击

如果真 (位数 ＝ 1)
减数 ＝ 取随机数 (1, 10)
被减数 ＝ 取随机数 (1, 减数)
减法减数.内容 ＝ 到文本 (减数)
减法被减数.内容 ＝ 到文本 (被减数)
返回 ()
如果真 (位数 ＝ 2)
减数 ＝ 取随机数 (10, 100)
减法减数.内容 ＝ 到文本 (减数)
被减数 ＝ 取随机数 (10, 减数)
减法被减数.内容 ＝ 到文本 (被减数)
返回 ()
如果真 (位数 ＝ 3)
减数 ＝ 取随机数 (100, 1000)
减法减数.内容 ＝ 到文本 (减数)
被减数 ＝ 取随机数 (100, 减数)
减法被减数.内容 ＝ 到文本 (被减数)
返回 ()

子程序名	返回值类型	公开	备 注
_减法提交按钮_被单击

结果 ＝ 减数 － 被减数
如果真 (到整数 (减法结果.内容) ＝ 结果)
信息框 (“计算正确，再接再厉”, 0, , )
减法减数.内容 ＝ “”
减法被减数.内容 ＝ “”
减法结果.内容 ＝ “”
返回 ()
信息框 (“计算错误，再仔细计算一下”, 0, , )

子程序名	返回值类型	公开	备 注
_除法位数确定_被单击

位数 ＝ 到整数 (除法位数.内容)
如果真 (位数 ＞ 3)
信息框 (“太大的数值运算不合适孩子练习。”, 0, , )
返回 ()

子程序名	返回值类型	公开	备 注
_除法出题_被单击

如果真 (位数 ＝ 1)
置随机数种子 ()
除数 ＝ 取随机数 (1, 10)
被除数 ＝ 取随机数 (1, 9)
除法除数.内容 ＝ 到文本 (除数)
除法被除数.内容 ＝ 到文本 (被除数)
返回 ()
如果真 (位数 ＝ 2)
置随机数种子 ()
除数 ＝ 取随机数 (10, 100)
除法除数.内容 ＝ 到文本 (除数)
被除数 ＝ 取随机数 (1, 9)
除法被除数.内容 ＝ 到文本 (被除数)
返回 ()
如果真 (位数 ＝ 3)
置随机数种子 ()
除数 ＝ 取随机数 (100, 1000)
除法除数.内容 ＝ 到文本 (除数)
被除数 ＝ 取随机数 (1, 9)
除法被除数.内容 ＝ 到文本 (被除数)
返回 ()

子程序名	返回值类型	公开	备 注
_除法提交按钮_被单击

结果 ＝ 取整 (除数 ÷ 被除数)
如果真 (到整数 (除法结果.内容) ＝ 结果)
信息框 (“计算正确，再接再厉”, 0, , )
除法除数.内容 ＝ “”
除法被除数.内容 ＝ “”
除法结果.内容 ＝ “”
返回 ()
信息框 (“计算错误，再仔细计算一下”, 0, , )

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 位数, 整数型<br /> .程序集变量 加数, 整数型<br /> .程序集变量 被加数, 整数型<br /> .程序集变量 结果, 整数型<br /> .程序集变量 乘数, 整数型<br /> .程序集变量 被乘数, 整数型<br /> .程序集变量 除数, 整数型<br /> .程序集变量 被除数, 整数型<br /> .程序集变量 减数, 整数型<br /> .程序集变量 被减数, 整数型<br /> <br /> .子程序 _加法位数确定_被单击<br /> <br /> 位数 ＝ 到整数 (加法位数.内容)<br /> .如果真 (位数 ＞ 3)<br />     信息框 (“太大的数值运算不合适孩子练习。”, 0, , )<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 _加法出题_被单击<br /> <br /> .如果真 (位数 ＝ 1)<br />     加数 ＝ 取随机数 (1, 10)<br />     加法加数.内容 ＝ 到文本 (加数)<br />     被加数 ＝ 取随机数 (1, 10)<br />     加法被加数.内容 ＝ 到文本 (被加数)<br />     返回 ()<br /> .如果真结束<br /> .如果真 (位数 ＝ 2)<br />     加数 ＝ 取随机数 (10, 100)<br />     加法加数.内容 ＝ 到文本 (加数)<br />     被加数 ＝ 取随机数 (10, 100)<br />     加法被加数.内容 ＝ 到文本 (被加数)<br />     返回 ()<br /> .如果真结束<br /> .如果真 (位数 ＝ 3)<br />     加数 ＝ 取随机数 (100, 1000)<br />     加法加数.内容 ＝ 到文本 (加数)<br />     被加数 ＝ 取随机数 (100, 1000)<br />     加法被加数.内容 ＝ 到文本 (被加数)<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 _加法提交按钮_被单击<br /> <br /> 结果 ＝ 加数 ＋ 被加数<br /> .如果真 (到整数 (加法结果.内容) ＝ 结果)<br />     信息框 (“计算正确，再接再厉”, 0, , )<br />     加法加数.内容 ＝ “”<br />     加法被加数.内容 ＝ “”<br />     加法结果.内容 ＝ “”<br />     返回 ()<br /> .如果真结束<br /> 信息框 (“计算错误，再仔细计算一下”, 0, , )<br /> <br /> .子程序 _乘法位数确定_被单击<br /> <br /> 位数 ＝ 到整数 (乘法位数.内容)<br /> .如果真 (位数 ＞ 3)<br />     信息框 (“太大的数值运算不合适孩子练习。”, 0, , )<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 _乘法出题_被单击<br /> <br /> .如果真 (位数 ＝ 1)<br />     乘数 ＝ 取随机数 (1, 10)<br />     乘法乘数.内容 ＝ 到文本 (乘数)<br />     被乘数 ＝ 取随机数 (1, 10)<br />     乘法被乘数.内容 ＝ 到文本 (被乘数)<br />     返回 ()<br /> <br /> .如果真结束<br /> .如果真 (位数 ＝ 2)<br />     乘数 ＝ 取随机数 (10, 100)<br />     乘法乘数.内容 ＝ 到文本 (乘数)<br />     被乘数 ＝ 取随机数 (10, 100)<br />     乘法被乘数.内容 ＝ 到文本 (被乘数)<br />     返回 ()<br /> <br /> .如果真结束<br /> .如果真 (位数 ＝ 3)<br />     乘数 ＝ 取随机数 (100, 1000)<br />     乘法乘数.内容 ＝ 到文本 (乘数)<br />     被乘数 ＝ 取随机数 (100, 1000)<br />     乘法被乘数.内容 ＝ 到文本 (被乘数)<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 _乘法提交按钮_被单击<br /> <br /> 结果 ＝ 乘数 × 被乘数<br /> .如果真 (到整数 (乘法结果.内容) ＝ 结果)<br />     信息框 (“计算正确，再接再厉”, 0, , )<br />     乘法乘数.内容 ＝ “”<br />     乘法被乘数.内容 ＝ “”<br />     乘法结果.内容 ＝ “”<br />     返回 ()<br />     信息框 (“计算错误，再仔细计算一下”, 0, , )<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 _减法位数确定_被单击<br /> <br /> 位数 ＝ 到整数 (减法位数.内容)<br /> .如果真 (位数 ＞ 3)<br />     信息框 (“太大的数值运算不合适孩子练习。”, 0, , )<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 _减法出题_被单击<br /> <br /> .如果真 (位数 ＝ 1)<br />     减数 ＝ 取随机数 (1, 10)<br />     被减数 ＝ 取随机数 (1, 减数)<br />     减法减数.内容 ＝ 到文本 (减数)<br />     减法被减数.内容 ＝ 到文本 (被减数)<br />     返回 ()<br /> <br /> .如果真结束<br /> .如果真 (位数 ＝ 2)<br />     减数 ＝ 取随机数 (10, 100)<br />     减法减数.内容 ＝ 到文本 (减数)<br />     被减数 ＝ 取随机数 (10, 减数)<br />     减法被减数.内容 ＝ 到文本 (被减数)<br />     返回 ()<br /> .如果真结束<br /> .如果真 (位数 ＝ 3)<br />     减数 ＝ 取随机数 (100, 1000)<br />     减法减数.内容 ＝ 到文本 (减数)<br />     被减数 ＝ 取随机数 (100, 减数)<br />     减法被减数.内容 ＝ 到文本 (被减数)<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 _减法提交按钮_被单击<br /> <br /> 结果 ＝ 减数 － 被减数<br /> .如果真 (到整数 (减法结果.内容) ＝ 结果)<br />     信息框 (“计算正确，再接再厉”, 0, , )<br />     减法减数.内容 ＝ “”<br />     减法被减数.内容 ＝ “”<br />     减法结果.内容 ＝ “”<br />     返回 ()<br /> .如果真结束<br /> 信息框 (“计算错误，再仔细计算一下”, 0, , )<br /> <br /> .子程序 _除法位数确定_被单击<br /> <br /> 位数 ＝ 到整数 (除法位数.内容)<br /> .如果真 (位数 ＞ 3)<br />     信息框 (“太大的数值运算不合适孩子练习。”, 0, , )<br /> .如果真结束<br /> 返回 ()<br /> <br /> .子程序 _除法出题_被单击<br /> <br /> .如果真 (位数 ＝ 1)<br />     置随机数种子 ()<br />     除数 ＝ 取随机数 (1, 10)<br />     被除数 ＝ 取随机数 (1, 9)<br />     除法除数.内容 ＝ 到文本 (除数)<br />     除法被除数.内容 ＝ 到文本 (被除数)<br />     返回 ()<br /> .如果真结束<br /> .如果真 (位数 ＝ 2)<br />     置随机数种子 ()<br />     除数 ＝ 取随机数 (10, 100)<br />     除法除数.内容 ＝ 到文本 (除数)<br />     被除数 ＝ 取随机数 (1, 9)<br />     除法被除数.内容 ＝ 到文本 (被除数)<br />     返回 ()<br /> .如果真结束<br /> .如果真 (位数 ＝ 3)<br />     置随机数种子 ()<br />     除数 ＝ 取随机数 (100, 1000)<br />     除法除数.内容 ＝ 到文本 (除数)<br />     被除数 ＝ 取随机数 (1, 9)<br />     除法被除数.内容 ＝ 到文本 (被除数)<br />     返回 ()<br /> .如果真结束<br /> <br /> <br /> .子程序 _除法提交按钮_被单击<br /> <br /> 结果 ＝ 取整 (除数 ÷ 被除数)<br /> .如果真 (到整数 (除法结果.内容) ＝ 结果)<br />     信息框 (“计算正确，再接再厉”, 0, , )<br />     除法除数.内容 ＝ “”<br />     除法被除数.内容 ＝ “”<br />     除法结果.内容 ＝ “”<br />     返回 ()<br /> .如果真结束<br /> 信息框 (“计算错误，再仔细计算一下”, 0, , )

补充内容 (2021-1-14 16:40):
E文件稍后发上来
大家有需要拿走就是

补充内容 (2021-1-17 18:43):
给孩子写的加减乘除练习程序【带打印功能】
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14661968
(出处: 精易论坛)

ghost12

全论坛易友发来贺电

ghost12

这么厉害！必须给个好评鼓励下~

davvy

哈哈，这个有用

fullytexeryue

prettyafei 发表于 2021-1-28 08:40
什么也没用，
就用的支持库。
模块也没用

感谢楼主回复，我下载了你分享的e文件，晚点再慢慢学习。谢谢了

prettyafei

fullytexeryue 发表于 2021-1-27 13:51
感谢楼主分享，我是新手，先拿你这个练习一下了。
另外，想问下，楼主都用了哪些组件呀？比如上面 ...

什么也没用，
就用的支持库。
模块也没用

fullytexeryue

感谢楼主分享，我是新手，先拿你这个练习一下了。
另外，想问下，楼主都用了哪些组件呀？比如上面“加法练习”“减法练习”“乘法练习”“除法练习”我用按钮做的，好像和你的不一样

凌峰6

谢谢楼主

sinewtec

支持下 感谢分享

桃花侠大战菊花

有了这玩意再也不用被乘法口诀了