Z zxyfd2000 Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-20 #1 急____求回文数的算法,只要写算法,不要写程序__170分送上,2小时之内
L LeeChange Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-20 #2 详细一点,是生成方法还是检测方法. 回文长度的数量级
Y YB_unique Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-20 #6 var a:longint; s:string; i,j,l:integer; str(a,s) l:length(s); j:=0; repeat j:=j+1 until s<>s[1+l-i] writeln(a)
var a:longint; s:string; i,j,l:integer; str(a,s) l:length(s); j:=0; repeat j:=j+1 until s<>s[1+l-i] writeln(a)
太 太阳火 Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-21 #9 生成方法简单的, 只要把字符串倒过来在加到原来的上面; 检测可以从两头开始依次判断是否相等,一旦不相等说明不是回文. 一直循环到中间的一个字符
D djflying Unregistered / Unconfirmed GUEST, unregistred user! 2001-12-26 #11 哈哈,小勇你真大方,不过你不把具体要求写出来,他们怎么回答呢? 还是把分给我吧.^-^ (这么久都不分分,怎么行呢?嘻嘻)