神奇的计算软件：计算不求人，机械设计计算样样行.

speed_long

speed_long 发表于 2024-7-28 22:11
已知跨棒距M值求变位系数

模数:                        mn=input(6)

speed_long

speed_long 发表于 2024-7-28 22:13

用  计算不求人  查尺寸公差与配合。

chnphn

谢谢楼主的慷慨分享。

张小生

谢谢楼主分享，谢谢

jssqzcly

要好好看看

speed_long

jssqzcly 发表于 2024-9-21 10:10
要好好看看

http://cal-diy.speed-long.com


计算不求人 计算平台 手机网络版即将重大升级，敬请期待~~！

speed_long

speed_long 发表于 2024-10-28 22:30
http://cal-diy.speed-long.com

计算不求人：
cal-diy.speed-long.com
全平台版（手机、电脑、电视机、平板等只要能上网的设备都可以使用）已升级为全新窗口式界面，如图：

speed_long

speed_long 发表于 2025-1-5 14:18
计算不求人：
cal-diy.speed-long.com
全平台版（手机、电脑、电视机、平板等只要能上网的设备都可以 ...

平台已搭建好，功能持续增加中，敬请关注。



有兴趣的朋友也可以自己用WINDOWS版“计算不求人”软件写好计算文件发给我，我添加到服务器上，这样就可以手机随时随地使用。

speed_long

speed_long 发表于 2025-1-5 14:24
平台已搭建好，功能持续增加中，敬请关注。

自己增加功能非常简单，如下图所示：
增加一个 “解一元二次方程”的功能

用记事本写如上图的内容，保存好，就得到如下图的计算功能：


源文件：
解一元二次方程：
系数a: a=input(1)
系数b: b=input(0)
常数c: c=input(-100)
判别式Δ: Δ=power(b,2)-4*a*c= 400
if(Δ>0)
根1：  x1=[-b+power[power(b,2)-4*a*c,0.5]]/2/a= 10
根2：  x2=[-b-power[power(b,2)-4*a*c,0.5]]/2/a= -10
end if
if(Δ eq 0)
根1：  x1=-b/2/a
根2：  x2=x1
end if
if(Δ<0)
  结果="没有实根！"
end if


input: 可修改的数据用它，自动创建 输入 文本框；
power( ) : 是幂函数，乘方开方不管多少次方都可以用它；
eq: 是判断是否相等的 符号
if: 就是如果的意思，如果  Δ>0 就执行 if 与 end if 之间的内容。

1564696890

好东西，下载试试看