cnCalc计算器论坛

 找回密码
 注册
搜索
查看: 3175|回复: 9

[聊天] Malical 2.0 & 招小白鼠

[复制链接]
发表于 2011-6-5 17:39:47 | 显示全部楼层 |阅读模式
本帖最后由 diameter 于 2011-6-11 16:43 编辑

Malical 2.0出炉
9L有更新!!!
跟1.97相比有巨大改观
先看一段代码吧
  1. ::main
  2.     var[num]
  3.     $num = val[gets]
  4.     print[sqrt[num]]
  5. ::end
  6. ::sqrt [a]
  7.     if type[a] != "NUMBER"
  8.         print["ERROR"+chr[10]]
  9.         return nil
  10.     end
  11.     var [x][x1]
  12.     $x = 2
  13.     $x1 = 0
  14.     while abs[x-x1]>0.0000001
  15.         
  16.         $x1 = x
  17.         $x = 0.5 * (x + a/x)
  18.         
  19.     end
  20.     return x
  21. ::end

复制代码
另外诚招小白鼠,愿意进行2.12版本测试的请留下QQ或者邮箱
 楼主| 发表于 2011-6-5 17:44:31 | 显示全部楼层
忘记传附件了……]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2011-6-5 18:21:18 | 显示全部楼层
小白鼠:[email protected]
发表于 2011-6-5 19:37:26 | 显示全部楼层
小白鼠?
发表于 2011-6-5 20:22:55 | 显示全部楼层
用一下。
发表于 2011-6-5 20:58:03 | 显示全部楼层
不好,比BASIC-A麻烦多了。
发表于 2011-6-6 12:45:02 | 显示全部楼层
顶上~

h.cz[at]qq[dot]com
发表于 2011-6-6 13:00:30 | 显示全部楼层
顶一下:
horizon[at]cncalc[dot]com
 楼主| 发表于 2011-6-11 16:43:08 | 显示全部楼层
紧急更新!!
去掉了强制的引用标识符“$”
例子

  1. ::main
  2.     var[n]
  3.     print["input:"]
  4.     n = val[gets]
  5.     println[sqrt[n]]
  6. ::end

  7. ::sqrt [a]
  8.     if type[a] != "NUMBER"
  9.         print["ERROR"+chr[10]]
  10.         return nil
  11.     end
  12.     var [x][x1]
  13.     x = 2
  14.     x1 = 0
  15.     while abs[x-x1]>0.0000001
  16.         
  17.         x1 = x
  18.         x = 0.5 * (x + a/x)
  19.         
  20.     end
  21.     return x
  22. ::end

  23. ::println [arg]
  24.     print[arg]
  25.     print[chr[10]]
  26. ::end
复制代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
发表于 2011-6-13 14:46:29 | 显示全部楼层
3.0中建议加入自然书写,因为很多计算程序没有自然书写还是浮云。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|cnCalc计算器论坛

GMT+8, 2024-11-24 21:12 , Processed in 0.062108 second(s), 23 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表