admin 管理员组

文章数量: 887021


2024年2月20日发(作者：双枪老太婆是华为的妈妈吗)

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

.局部变量 数字1, 文本型

.局部变量 数字2, 文本型

.局部变量 符号, 文本型

.局部变量 a, 文本型

标准输出 (, #换行符 ＋ “ 欢迎使用加减乘除计算器”)

.循环判断首 ()

标准输出 (, #换行符 ＋ #换行符 ＋ “请输入第一个数字：”)

数字1 ＝ 标准输入 ()

标准输出 (, “请输入第二个数字：”)

数字2 ＝ 标准输入 ()

标准输出 (, “请输入运算的符号：”)

符号 ＝ 标准输入 ()

.如果 (符号 ＝ “+”)

标准输出 (, “两数和为：” ＋ 到文本 (到数值 (数字1) ＋ 到数值 (数字2)))

.否则

.如果 (符号 ＝ “-”)

标准输出 (, “两数差为：” ＋ 到文本 (到数值 (数字1) － 到数值 (数字2)))

.否则

.如果 (符号 ＝ “*”)

标准输出 (, “两数积为：” ＋ 到文本 (到数值 (数字1) × 到数值 (数字2)))

.否则

.如果 (符号 ＝ “/”)

.判断循环首 (数字2 ＝ “0”)

标准输出 (, #换行符 ＋ “除数不能为零 请重新输入”)

数字2 ＝ 标准输入 ()

.判断循环尾 ()

标准输出 (, “两数商为：” ＋ 到文本 (到数值 (数字1) ÷ 到数值

(数字2)))

.否则

标准输出 (, “符号请选择+-*/中的一个”)

.如果结束

.如果结束

.如果结束

.如果结束

标准输出 (, #换行符 ＋ #换行符 ＋ “退出请按q键”)

a ＝ 标准输入 ()

.循环判断尾 (a ≠ “q” 且 a ≠ “Q”)

标准输出 (, #换行符 ＋ #换行符 ＋ #换行符 ＋持,欢迎再次使用!”)

延时 (2500)

返回 (0) ' 可以根据您的需要返回任意数值

感谢您对本产品的支 “


本文标签： 数值 数字 标准 程序 启动

版权声明：本文标题：易语言计算器源码 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.freenas.com.cn/free/1708366843h521659.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。