Pascal 算法点滴

1.Pascal没有幂函数，只能通过e ^x来转换：
x ⁿ=e ^n*ln(x)，Pascal表达式：

1. exp(n*ln(x))

同样任意底的对数：ln(x)/ln(n)，如log ₃10=ln(10)/ln(3)

2.求一个整数n的位数：

1. trunc(ln(n)/ln(10))+1

3.一位一位分解整数n：

1. repeat
2.   i:= n mod 10;
3.   write(i:5);
4.   n:=n div 10
5. until n<=0;