TC官方合作论坛

标题: 【有源码】一元二次方程运算器 [打印本页]

作者: li664841402 时间: 2013-1-2 21:40
标题: 【有源码】一元二次方程运算器
空间一元二次方程求解
//默认空间
//开始按钮_点击操作
功能开始_点击()
字符型 a
a=编辑框.获得文本("编辑框0")
字符型 b
b=编辑框.获得文本("编辑框1")
字符型 a,x1,x2
c=编辑框.获得文本("编辑框2")
如果((b*b-4*a*c)<0)
编辑框.设置文本("编辑框3","无实根")
编辑框.设置文本("编辑框4","无实根")
否则
x1=((-b)+数学.开方(b*b-4*a*c))/(2*a)
x2=((-b)-数学.开方(b*b-4*a*c))/(2*a)
编辑框.设置文本("编辑框3",x1)
编辑框.设置文本("编辑框4",x2)
返回 0
如果结束

功能结束

//退出按钮_点击操作
功能退出_点击()
辅助.退出()
功能结束
空间结束
//空间结束语句
[attach]7086[/attach]

作者: 尛情哥 时间: 2013-1-2 21:42
我来坐坐沙发

作者: stxuhong 时间: 2013-1-2 22:07

偷懒开发成功

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)