用易写个注册码判断程序，给大家猜猜注册码

hacker0058

.版本 2

.子程序 注册码是否正确, 逻辑型
.参数 注册码文本, 文本型
.局部变量 M, 整数型, , "7"

.计次循环首 (到整数 (取文本长度 (注册码文本) ≠ 8), )
    返回 (假)
.计次循环尾 ()
.计次循环首 (到整数 (取代码 (注册码文本, 1) ≠ 77), )
    返回 (假)
.计次循环尾 ()
M [1] ＝ 到整数 (取文本中间 (注册码文本, 到整数 (字符 (50)), 1))
M [2] ＝ 到整数 (取文本中间 (注册码文本, 到整数 (字符 (54)), 1))
M [3] ＝ 求平方根 (M [2] ＋ 3)
M [4] ＝ 求次方 (M [1], 2)
M [5] ＝ 求次方 (M [1], 4) ＋ 2 × 求次方 (M [1], 3) ＋ M [4]
M [6] ＝ M [3] ＋ M [4] ＋ M [1]
M [6] ＝ M [6] × M [3]
M [6] ＝ M [6] ＋ 3 ＋ M [5] ÷ 4
M [7] ＝ 12 × M [3]
.计次循环首 (到整数 (M [6] － M [7] ＝ 3), )
    返回 (真)
.计次循环尾 ()
返回 (假)

[ 本帖最后由 hacker0058 于 2006-6-15 17:21 编辑 ]

hacker0058

大家算算注册码是多少吗？

黑夜彩虹

＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋
请不要在『 编程园地 』发类似的贴子（有索求注册码嫌疑），锁贴