1.
在var前面那行加一句: uses crt;  这是引用tp的crt单元.
然后把cls换成clrscr.
运行时如果出现Error 200: Division by zero的话, 请下载一个crt单元补丁t7tplfix.
2.如果你用free pascal, 那么p:=power(2,3)就是p=2^3.
如果你用turbo pascal, 一点一点乘吧. pascal为了运行效率和编译效率, 没有这个乘方符号.
3.在var前面那行加一句: uses crt;
然后, gotoxy(x,y)定位光标到(x,y).
4.copy(s,a,b)从字符串s的第a位开始,连续截取b位.
例如:
s:='abcdef';
t:=copy(s,2,2);
则t现在是'bc'.
delete(s,a,b)从字符串s的第a位开始,连续删掉s的b位.
例如:
s:='abcdef';
delete(s,2,2);
则s现在是'adef'.
insert(s1,s2,b)从字符串s2的第b位开始, 插入字符串s1.
例如:
s:='abef';
insert('cd',s,3);
则s现在是'abcdef'.

我想说的是, 难道楼主不看pascal的help? help里面有很多东西的.

以上

第二个问题：可以2**4的，2的4次访，FP中
我觉得搂主太小气了，人家写了这么多，你怎么只给10分？？

m的n次方    exp(ln(m)*n)   在pascal中只有自然对数e

如果是用TP7.0好像要打补丁，否则用use会报错