|
|
f(g(X))数列求和
准备：
清空全部数据
g(X)开始数字X->A
g(X)结束数字X->B
输入：
g(A)->C:0Rec(Pol(f(C)+X,0),0)/(A-B+1)+A+1->A
运行：
狂按等号到Error为止
说明：
可以根据不同数列的性质来调整，最后结果在X
解方程f(X)
准备：
清空全部数据
开始数字->X
开始位（二进制，如果解不了就增大之）->Y
输入：
|f(X)|/f(X)->M:-.5M|f(X+2^Y)|/f(X+2^Y)+.5->A:-.5M|f(X-2^Y)|/f(X-2^Y)+.5->B:X+.5A^Y(1-B)->X:X-.5B^Y->X:Y-1->Y:
运行：
狂按等号到Error为止
说明：
二分法，程序体积过大，不建议日常使用，最后结果在X
随机正整数
准备：
清空全部数据
最小值->A
最大值->B
输入：
0/(|X-A|/(X-A)-1)/(|B-X|/(B-X)-1)+1000Ran#->X
运行：
狂按等号到Error为止
说明：
最后结果在X
f(X)积分（简易版）
准备：
清空全部数据
开始数字->A
结束数字->B
精确度->C
输入：
f(A)*C+X->X:0/(|A-B|/(A-B)-1)+A+C->A
运行：
狂按等号到Error为止
说明：
A必须小于B，由于计算步骤多所以忽略部分功能，最后结果在X
f(X)微分
准备：
清空全部数据
f(X)数字X->A
开始精确度->Y
输入：
0/((f(A+Y)-f(A-Y))/2/Y-X)+(f(A+Y)-f(A-Y))/2/Y->X:Y/2->Y
运行：
狂按等号到Error为止
说明：
适合和积分混用，最后结果在X
猜数（来自：STALKER_Scar）
准备：
清空全部数据
随机数->Y
输入：
欲猜数:(Ans-Y)/(|Ans-Y|+10^-99)+Pol(X+1,0)
运行：
按二下等号，修改，再按二下等号，循环到猜中为止
第二次等号时显示1说明你猜的数字大了，显示-1说明猜的数字小了，显示0说明猜中
说明：
要防止看到开始数Y，可以输入Rec(1000Ran#,90Ran#)+1
Rec法取整取零
准备：
清空全部数据
取整取零目标->A
输入：
Rec(1,A*360+180)Pol(X,Y)*0+Y/360+.5->A
运行：
按一次等号
说明：
小数部分在A，整数部分请自行计算，如果要组合赋值，可以把A替换为Y
Rec法最大公因数
准备：
清空全部数据
被除数->A
除数->B
输入：
0Pol(Rec(1,360A/B+180),Y)+BY/360+1.5B->A:A-B->B:A-B->A
运行：
狂按等号到A=B为止
说明：
最大公因数在A和B，可以把开头改为0/(A-B)*Pol(……以自动终止程序（感谢zasdfgbnm补充！）
Rnd法四舍五入
准备：
清空全部数据
取整取零目标->X
输入：
10^(9)(Rnd(10^(-9)X+1)-1)
运行：
按一次等号
说明：
整数部分在X，小数部分请自行计算，精确、高速，但只支持10^9以下的非负数
输出所有f(X,Y)
准备：
清空全部数据
开始数字X+0.5->X
结束数字X->A
开始数字Y+0.5->Y
结束数字Y->B
X-0.5->D
输入：
f(X,Y)+0sqrt(B-Y)Rec(Pol(.5X+.5+.5D-(.5X+.5-.5D)|X-A|/(X-A),Y+.5|X-A|/(X-A)+.5),Y)
运行：
狂按等号到Error为止
说明：
稍加修改可以用于显示乘法口诀表等
下一个敬请期待 |
|
发表于 2009-8-17 17:29:39
沉默卡
变色卡
千斤顶
显身卡
发表于 2009-8-17 17:36:24
楼主
