- 求二叉树的先序序列
-
sutank2009 LV 8 @ 2009-11-02 21:39:08
Prog65011.pas(12,8) Error: Can't determine which overloaded function to call
Prog65011.pas(36) Fatal: There were 1 errors compiling module, stopping
Fatal: Compilation aborted
在FP上运行正确。。。
本想做到简单题刷AC，结果交了4次，全部是这种东西！？
8 条评论
-
ChenYN712 LV 6 @ 2016-02-25 13:42:45
hehe
-
@ 2015-04-16 12:41:02
k! f! c!
-
@ 2013-12-16 18:20:18
函数重载失败
-
@ 2009-11-03 12:57:50
w c !!
啊啊 ！！
我活了几十年也没有见过改成 char 可以 AC ？！
我ＯＲＺ 啊， 叫你一声 爷 ！！
-
@ 2009-11-02 23:24:50
没记错的话，POS函数需要给STRING类型（支持CHAR重载还是把CHAR当作STRING忘了）但是POS函数他不认定义成'A'..'Z'吧（因为POS没有你这种类型的重载所以就出错了…是否编译器问题不得而知），改用ch:char看看
-
@ 2009-11-02 21:52:04
……
请问lz 到底是“几”呢？
这话听起来您很老了，Orz 老前辈。 代表全体Oier 向老前辈致敬！！！
老前辈带徒弟吗？ 要是您带徒弟就收留下我吧。（先谢谢了） -
@ 2009-11-02 21:46:04
大婶您活了几十年？？？？=。=
orz...... -
@ 2009-11-02 21:41:36
附上程序
附上程序——
program zx_hx_qx;
var
zx,hx:string;
procedure link(zx,hx:string);
var
ch:'A'..'Z';
zx1,hx1,zx2,hx2:string;
k,l:longint;
begin
l:=length(zx);
ch:=hx[l];
k:=pos(ch,zx); 1 then
begin
if k>1 then
begin
zx2:=copy(zx,1,k-1);
hx2:=copy(hx,1,k-1);
link(zx2,hx2);
end;
if l>k then
begin
zx1:=copy(zx,k+1,l-k);
hx1:=copy(hx,k,l-k);
link(zx1,hx1);
end;
end;
end;
begin
readln(zx);
readln(hx);
link(zx,hx);
end.
- 1
