本帖最后由 逸豫 于 2010-11-9 21:18 编辑
这是脑残的数值版- - |
因为整数值(int)有长度的限制 导致能读入的数字有大小限制 如果把每个数字都当成字符 就能自由的控制长度(也比较符合回文这关于语文的嘛~~) 不懂可以多问~~ |
var s:ansistring; begin readln(s); for i:=1 to length(s) div 2 do if s[i]<>s[length(s)-i+1] then begin writeln('No!'); halt; end; end; writeln('yes'); end. |
用char读入数字即可 |
......春哥表示完全看不懂 |
请教一下电工 保证一天学到的东西比在学校一年学的还多 |
这是物理啊= = 物理什么的最讨厌了~~ |
|
站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作
GMT+8, 2025-7-19 18:07
Powered by Discuz! X3.1
© 2001-2013 Comsenz Inc.