E4A源码前言:
从圆周率计算到寻找最新的更大的素数等等,其运算复杂性最终都将由为基本的乘法的运算速度决定
E4A部分源码展示:
[E4A源码]大数运算例程源码
事件 按钮1.被单击()
编辑框1.内容 = 大数相加("987654321987654321987654321987654321","1234567123456712345671234567")
编辑框2.内容 = 987654321987654321987654321987654321 + 1234567123456712345671234567
结束 事件
事件 按钮2.被单击()
编辑框1.内容 = 大数相减("9.87654321987654321","1.2345671234567")
编辑框2.内容 = 9.87654321987654321 - 1.2345671234567
结束 事件
事件 按钮3.被单击()
编辑框1.内容 = 大数相乘("987654321987654321","12345671234567")
编辑框2.内容 = 987654321987654321 * 12345671234567
结束 事件
事件 按钮4.被单击()
编辑框1.内容 = 大数相除("987","123",17)
编辑框2.内容 = 987 / 123
结束 事件
事件 按钮5.被单击()
编辑框1.内容 = 大数比较("987654321987654321","12345671234567")
如果 987654321987654321 < 12345671234567 则
编辑框2.内容 = "-1"
否则如果 987654321987654321 = 12345671234567 则
编辑框2.内容 = "0"
否则
编辑框2.内容 = "1"
结束 如果
结束 事件
事件 按钮6.被单击()
编辑框1.内容 = 大数求余("987654321987654321","12345671234567")
编辑框2.内容 = 987654321987654321 % 12345671234567
结束 事件
E4A源码下载:
|
|
|
|
|
|