易语言编写的算术题程序实例代码
这是一个用易语言编写的一款自动出题的软件
程序下载地址：https://www.nhooo.com/codes/645872.html
以下是源码内容：
.版本2
.程序集窗口程序集1
.子程序_按钮1_被单击
.判断开始(编辑框1.内容＝“”或编辑框2.内容＝“”)
信息框(“账户名或密码不能为空！”,0,“提示”,)
编辑框1.获取焦点()
.判断(编辑框1.内容＝“sau123456”或编辑框2.内容＝“sau123456”)
载入(窗口3,,假)
销毁()
信息框(“登陆成功！”,0,“提示”,)
.默认
信息框(“账户名或密码错误！”,0,“提示”,)
编辑框1.获取焦点()
.判断结束
.版本2
.程序集窗口程序集_窗口3
.子程序_标签1_反馈事件,整数型
.参数参数一,整数型
.参数参数二,整数型
.子程序_分组框1_鼠标左键被按下,逻辑型
.参数横向位置,整数型
.参数纵向位置,整数型
.参数功能键状态,整数型
.子程序_按钮1_被单击
.判断开始(窗口3.组合框1.内容＝“简单”或窗口3.组合框1.内容＝“中等”)
载入(窗口1,,假)
销毁()
.判断(窗口3.组合框1.内容＝“困难”)
载入(窗口2,,假)
销毁()
.判断(窗口3.组合框1.内容＝“”)
信息框(“请选择难度！”,0,“提示”,)
.默认
.判断结束
.版本2
.程序集窗口程序集2
.子程序_窗口1_创建完毕
.判断开始(窗口3.组合框1.内容＝“简单”)
难度＝1
.判断(窗口3.组合框1.内容＝“中等”)
难度＝10
.默认
.判断结束
开始出题()
.子程序_按钮2_被单击
载入(窗口3,,假)
销毁()
.子程序_按钮3_被单击
开始出题()
.子程序开始出题
.局部变量次数,整数型
.局部变量标签,标签
.局部变量编辑框,编辑框
.局部变量编辑框2,编辑框
.局部变量判断值,整数型
.局部变量题目1,整数型
.局部变量题目2,整数型
.局部变量图片框,图片框
.变量循环首(1,20,1,次数)
图片框＝取标记组件(次数＋60)
编辑框＝取标记组件(次数＋40)
编辑框2＝取标记组件(次数＋20)
图片框.图片＝{}
编辑框.内容＝“”
编辑框.可视＝假
编辑框2.内容＝“”
.变量循环尾()
按钮1.可视＝真
按钮2.可视＝假
按钮3.可视＝假
标签41.标题＝“”
答对＝0
数组清零(答案)
.变量循环首(1,20,1,次数)
标签＝取标记组件(次数)
题目1＝取随机数(难度,难度×10)
题目2＝取随机数(难度,难度×10)
判断值＝取随机数(1,4)
.判断开始(判断值＝1)
答案[次数][1]＝题目1＋题目2
标签.标题＝到文本(到文本(题目1)＋“＋”＋到文本(题目2)＋“＝”)
.判断(判断值＝2)
.判断循环首(题目1＜题目2)
题目1＝取随机数(难度,难度×10)
题目2＝取随机数(难度,难度×10)
.判断循环尾()
答案[次数][1]＝题目1－题目2
标签.标题＝到文本(到文本(题目1)＋“-”＋到文本(题目2)＋“=”)
.判断(判断值＝3)
答案[次数][1]＝题目1×题目2
标签.标题＝到文本(到文本(题目1)＋“×”＋到文本(题目2)＋“=”)
.判断(判断值＝4)
.判断循环首(题目1＜题目2)
题目1＝取随机数(难度,难度×10)
题目2＝取随机数(难度,难度×10)
.判断循环尾()
答案[次数][1]＝题目1÷题目2
答案[次数][2]＝题目1％题目2
标签.标题＝到文本(到文本(题目1)＋“÷”＋到文本(题目2)＋“=”)
编辑框＝取标记组件(次数＋40)
标签＝取标记组件(次数＋80)
编辑框.可视＝真
标签.标题＝“……”
.默认
.判断结束
.变量循环尾()
.子程序_按钮1_被单击
.局部变量次数,整数型
.局部变量编辑框1,编辑框
.局部变量编辑框2,编辑框
.局部变量图片框,图片框
按钮1.可视＝假
按钮2.可视＝真
按钮3.可视＝真
.变量循环首(1,20,1,次数)
编辑框1＝取标记组件(次数＋40)
编辑框2＝取标记组件(次数＋20)
图片框＝取标记组件(次数＋60)
.判断开始(编辑框1.可视＝真)
.判断开始(到数值(编辑框2.内容)＝答案[次数][1]且到数值(编辑框1.内容)＝答案[次数][2])
答对＝答对＋1
图片框.图片＝#图片1
.默认
图片框.图片＝#图片2
.判断结束
.判断(到数值(编辑框2.内容)＝答案[次数][1])
答对＝答对＋1
图片框.图片＝#图片1
.默认
图片框.图片＝#图片2
.判断结束
标签41.标题＝“您答对题目数为”＋到文本(答对)＋“道，答错”＋到文本(20－答对)＋“道！”
.变量循环尾()
.版本2
.程序集窗口程序集_窗口2
.子程序_窗口2_创建完毕
开始出题()
.子程序_按钮2_被单击
载入(窗口3,,假)
销毁()
.子程序_按钮3_被单击
开始出题()
.子程序开始出题
.局部变量次数,整数型
.局部变量标签,标签
.局部变量编辑框,编辑框
.局部变量编辑框2,编辑框
.局部变量判断值,整数型
.局部变量题目1,整数型
.局部变量题目2,整数型
.局部变量题目3,整数型
.局部变量题目4,整数型
.局部变量图片框,图片框
.局部变量最大公约数,整数型
.局部变量分子,整数型
.局部变量分母,整数型
.变量循环首(1,20,1,次数)
图片框＝取标记组件(次数＋60)
编辑框＝取标记组件(次数＋40)
编辑框2＝取标记组件(次数＋20)
图片框.图片＝{}
编辑框.内容＝“”
编辑框.可视＝假
编辑框2.内容＝“”
.变量循环尾()
按钮1.可视＝真
按钮2.可视＝假
按钮3.可视＝假
标签41.标题＝“”
答对＝0
数组清零(答案)
.变量循环首(1,20,1,次数)
标签＝取标记组件(次数)
分类＝取随机数(1,2)
.判断开始(分类＝1)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断(分类＝2)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环首(题目1＞题目2)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环尾()
题目3＝取随机数(1,100)
题目4＝取随机数(1,100)
.判断循环首(题目3＞题目4)
题目3＝取随机数(1,100)
题目4＝取随机数(1,100)
.判断循环尾()
.默认
.判断结束
.判断开始(分类＝1)
判断值＝取随机数(1,4)
.判断开始(判断值＝1)
答案[次数][1]＝题目1＋题目2
标签.标题＝到文本(到文本(题目1)＋“＋”＋到文本(题目2)＋“＝”)
.判断(判断值＝2)
.判断循环首(题目1＜题目2)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环尾()
答案[次数][1]＝题目1－题目2
标签.标题＝到文本(到文本(题目1)＋“-”＋到文本(题目2)＋“=”)
.判断(判断值＝3)
答案[次数][1]＝题目1×题目2
标签.标题＝到文本(到文本(题目1)＋“×”＋到文本(题目2)＋“=”)
.判断(判断值＝4)
.判断循环首(题目1＜题目2)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环尾()
答案[次数][1]＝题目1÷题目2
答案[次数][2]＝题目1％题目2
标签.标题＝到文本(到文本(题目1)＋“÷”＋到文本(题目2)＋“=”)
编辑框＝取标记组件(次数＋40)
标签＝取标记组件(次数＋80)
编辑框.可视＝真
标签.标题＝“……”
编辑框.可视＝真
.默认
.判断结束
.判断(分类＝2)
编辑框＝取标记组件(次数＋40)
编辑框.可视＝真
判断值＝取随机数(1,2)
最大公约数＝最大公约数(题目1,题目2)
题目1＝题目1÷最大公约数
题目2＝题目2÷最大公约数
最大公约数＝最大公约数(题目3,题目4)
题目3＝题目3÷最大公约数
题目4＝题目4÷最大公约数
.判断开始(判断值＝1)
分子＝题目1×题目4＋题目3×题目2
分母＝题目2×题目4
最大公约数＝最大公约数(分子,分母)
分子＝分子÷最大公约数
分母＝分母÷最大公约数
答案[次数][1]＝分子
答案[次数][2]＝分母
标签.标题＝到文本(到文本(题目1)＋“/”＋到文本(题目2)＋“＋”＋到文本(题目3)＋“/”＋到文本(题目4)＋“＝”)
标签＝取标记组件(次数＋80)
标签.标题＝“/”
.判断(判断值＝2)
分子＝题目1×题目4－题目3×题目2
.判断循环首(分子＜0)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环首(题目1＞题目2)
题目1＝取随机数(1,100)
题目2＝取随机数(1,100)
.判断循环尾()
题目3＝取随机数(1,100)
题目4＝取随机数(1,100)
.判断循环首(题目3＞题目4)
题目3＝取随机数(1,100)
题目4＝取随机数(1,100)
.判断循环尾()
分子＝题目1×题目4－题目3×题目2
.判断循环尾()
最大公约数＝最大公约数(题目1,题目2)
题目1＝题目1÷最大公约数
题目2＝题目2÷最大公约数
最大公约数＝最大公约数(题目3,题目4)
题目3＝题目3÷最大公约数
题目4＝题目4÷最大公约数
分子＝题目1×题目4－题目3×题目2
分母＝题目2×题目4
最大公约数＝最大公约数(分子,分母)
分子＝分子÷最大公约数
分母＝分母÷最大公约数
答案[次数][1]＝分子
答案[次数][2]＝分母
标签.标题＝到文本(到文本(题目1)＋“/”＋到文本(题目2)＋“-”＋到文本(题目3)＋“/”＋到文本(题目4)＋“＝”)
标签＝取标记组件(次数＋80)
标签.标题＝“/”
.默认
.判断结束
.默认
.判断结束
.变量循环尾()
.子程序_按钮1_被单击
.局部变量次数,整数型
.局部变量编辑框1,编辑框
.局部变量编辑框2,编辑框
.局部变量图片框,图片框
按钮1.可视＝假
按钮2.可视＝真
按钮3.可视＝真
.变量循环首(1,20,1,次数)
编辑框1＝取标记组件(次数＋40)
编辑框2＝取标记组件(次数＋20)
图片框＝取标记组件(次数＋60)
.判断开始(编辑框1.可视＝真)
.判断开始(到数值(编辑框2.内容)＝答案[次数][1]且到数值(编辑框1.内容)＝答案[次数][2])
答对＝答对＋1
图片框.图片＝#图片1
.默认
图片框.图片＝#图片2
.判断结束
.判断(到数值(编辑框2.内容)＝答案[次数][1])
答对＝答对＋1
图片框.图片＝#图片1
.默认
图片框.图片＝#图片2
.判断结束
标签41.标题＝“您答对题目数为”＋到文本(答对)＋“道，答错”＋到文本(20－答对)＋“道！”
.变量循环尾()
.子程序最大公约数,整数型
.参数数1,整数型
.参数数2,整数型
.局部变量中介,整数型
.判断循环首(数2％数1≠0)
中介＝数2％数1
数2＝数1
数1＝中介
.判断循环尾()
返回(数1)