服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|Java教程|ASP教程|编程技术|正则表达式|C/C++|IOS|C#|Swift|Android|VB|R语言|JavaScript|易语言|vb.net|

服务器之家 - 编程语言 - 易语言 - 易语言编写的算术题程序实例代码

易语言编写的算术题程序实例代码

2022-01-19 14:22易语言教程网 易语言

在本篇文章中我们给大家分享了一个关于易语言编写的算术题程序,有兴趣的朋友们可以跟着参考下。

这是一个用易语言编写的一款自动出题的软件

以下是源码内容:

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
.版本 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)

延伸 · 阅读

精彩推荐
  • 易语言易语言在画板中写出指定文本当画板中已满会自动滚屏

    易语言在画板中写出指定文本当画板中已满会自动滚屏

    今天小编就为大家分享一篇关于易语言在画板中写出指定文本当画板中已满会自动滚屏,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,...

    易语言帮助手册9092022-01-12
  • 易语言一步一步跟我学易语言之关于变量

    一步一步跟我学易语言之关于变量

    今天小编就为大家分享一篇关于一步一步跟我学易语言之关于变量,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随...

    易语言帮助手册10822021-06-17
  • 易语言一步一步跟我学易语言之第二个易程序菜单设计

    一步一步跟我学易语言之第二个易程序菜单设计

    今天小编就为大家分享一篇关于的一步一步跟我学易语言之第二个易程序菜单设计,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要...

    易语言帮助手册7092021-06-17
  • 易语言易语言设置进度条边框样式的方法

    易语言设置进度条边框样式的方法

    今天小编就为大家分享一篇关于易语言设置进度条边框样式的方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随...

    易语言帮助手册4422022-01-20
  • 易语言易语言关于程序进程和线程的基础知识

    易语言关于程序进程和线程的基础知识

    今天小编就为大家分享一篇关于易语言关于程序进程和线程的基础知识,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起...

    三叶资源网6662022-02-24
  • 易语言易语言生成exe文件的方法

    易语言生成exe文件的方法

    在本篇内容中小编给大家分享的是关于易语言生成exe文件的方法知识点,需要的朋友们参考下。...

    易语言教程网14792022-03-01
  • 易语言实例操作易语言载入窗口

    实例操作易语言载入窗口

    在本文中小编给大家整理的是关于易语言载入窗口的教程和步骤内容,需要的可以跟着学习下...

    易语言教程网19162022-03-02
  • 易语言易语言获取指定磁盘的名称

    易语言获取指定磁盘的名称

    今天小编就为大家分享一篇关于易语言获取指定磁盘的名称,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来...

    易语言帮助手册12662022-01-04