wooddoor 发表于 2019-3-19 15:37:40

给小学生练习用,四则运算练习

目前还非常非常的简陋,仅仅自动生成2个数的四则运算(100内),后续慢慢更新,完全开源,托管于gitee,源码地址:https://gitee.com/wooddoor/szys_android


qin168 发表于 2020-3-13 13:18:58

333333333333333333333333

慧博天远 发表于 2020-1-6 20:54:43

下载测试一下

QQ1015561 发表于 2019-3-23 01:37:20

666666666666666666666666666666

pt1314 发表于 2019-3-20 06:04:53

易如意中文编程学习交流论坛有你更精彩~

wooddoor 发表于 2019-3-19 16:02:35

本帖最后由 wooddoor 于 2019-3-19 16:24 编辑

源码:

变量 运算符数组 为 文本型(4) 'TOFIX:E4A中不知该怎么定义一个全局常量,或者全局数组该怎么初始化呢?待研究
变量 运算符 为 整数型
变量 数1 为 整数型
变量 数2 为 整数型
变量 答案 为 整数型
变量 启动时间 为 长整数型
变量 计时 为 长整数型

事件 主窗口.创建完毕()
    运算符数组="+"
    运算符数组="-"
    运算符数组="×"
    运算符数组="÷"
      
    生成算式()
结束 事件

事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
    如果 键代码 = 返回键 则
      如果 取启动时间() - 启动时间 >2000 则
            弹出提示("再按一次退出程序")
            启动时间 = 取启动时间()
      否则
            结束程序()
      结束 如果
    结束 如果
结束 事件

过程 生成算式()
    运算符= 取随机数(0,3)
    判断 运算符
      分支 0
            数1 = 取随机数(1, 100)
            数2 = 取随机数(1, 100)
      分支 1
            数1 = 取随机数(1, 100)
            数2 = 取随机数(1, 数1)
      分支 2
            数1 = 取随机数(1, 9)
            数2 = 取随机数(1, 9)
      分支 3
            数1 = 取随机数(1, 100)
            数2 = 取随机数(1, 9)
            判断循环首 数1 % 数2 <> 0
                数1 = 取随机数(1, 100)
            判断循环尾
    结束 判断
   
    编辑框_题目.内容 = 整数到文本(数1) & 运算符数组[运算符] & 整数到文本(数2)
    编辑框_答案.内容 = ""
    '编辑框_答案.获取焦点()
    '编辑框_答案.显示输入法()
    计时 = 取启动时间()
结束 过程

事件 编辑框_答案.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
    'TOFIX:E4A的编辑框设置为只输入数字,默认还能输入空格、+-*/=,并且下面设置屏蔽毫无作用,待研究
    'Android KeyCode列表:https://blog.csdn.net/pan0755/article/details/78475517
    判断 键代码
      分支 回车键
            提交答案()
      分支 62 'KEYCODE_SPACE   空格键   62
            屏蔽 = 真
      分支 81 'KEYCODE_PLUS   按键'+'   81
            屏蔽 = 真
      分支 69 'KEYCODE_MINUS   按键'-'   69
            屏蔽 = 真
      分支 56 'KEYCODE_PERIOD   按键'.'   56
            屏蔽 = 真
      分支 17 'KEYCODE_STAR   按键'*'   17
            屏蔽 = 真
      分支 76 'KEYCODE_SLASH   按键'/'   76
            屏蔽 = 真
      分支 70 'KEYCODE_EQUALS   按键'='   70
            屏蔽 = 真
    结束 判断
结束 事件

过程 提交答案()
    变量 用时 为 长整数型 = 取启动时间() - 计时
    判断 运算符
      分支 0
            答案 = 数1 + 数2
      分支 1
            答案 = 数1 - 数2
      分支 2
            答案 = 数1 * 数2
      分支 3
            答案 = 数1 / 数2
    结束 判断
    '    答案 = 表达式计算(编辑框_题目.内容) '注意要把×、÷替换回*、/
    变量 提示内容 为 文本型 = "输入的答案是:" & 整数到文本(到整数(编辑框_答案.内容)) & "\n" & "正确答案是:" & 整数到文本(答案) & "\n共用时:" & 到文本(用时/1000) & "秒"
    如果 到整数(编辑框_答案.内容) = 答案 则
      信息框("恭喜你答对了!", 提示内容, "非常棒,再来一次")
    否则
      信息框("算错了哦,要小心计算啊!", 提示内容, "我要继续努力")
    结束 如果
   
    生成算式()
结束 过程
页: [1]
查看完整版本: 给小学生练习用,四则运算练习