沈阳华府天地影城电话:3^x+2^x-4^x用pascal语言怎么写

来源:百度文库 编辑:高校问答 时间:2024/05/11 02:38:23

写一个小小的算法就行了啊!
function f(x:integer):integer;{当整数来处理了啊}
var
i,t,k:integer;
t:=1;
for i:=1 to x do t:=t*3;
k:=t;
t:=1;
for i:=1 to x do t:=t*2;
k:=k+t;
t:=1;
for i:=1 to x do t:=t*4;
k:=k-t;
f:=k;
end;

这个式子就是f(x)啦!

exp(x*ln(3))+exp(x*ln(2))-exp(x*ln(4))
打开浮点运算器

M^N在FreePascal中可以用power(m,n)来计算,也可以直接用m**n来算,而如果x太大,就只能用高精度

用换底公式拉 玩奥赛的人常用。。。
m^n=exp(n*ln(m))
如果m,n都是整数,那么需要用round()取整,慎用trunc()精度问题
m^n=round(exp(n*ln(m)))

是用换底公式

m^n = exp(ln(m)*n)

以m为底n的对数 = exp(m)/exp(n)

做循环~~~~~~~~