1樓：匿名使用者
vari:integer;
tf:boolean;
s:string;
begin
tf:=true;
readln(s);
for i:=1 to length(s) div 2 do if s[i]<>s[length(s)-i] then tf:=false;
if tf then writeln('yes.') else writeln('no.');
end.
2樓：雲中放牧
program exp;
varst:string;
i,j:longint;
flag:boolean;
begin
readln(st);
i:=1; j:=length(st)-1;
flag:=true;
while (i<=j)and(flag) dobegin
if st[i]<>st[j] then flag:=falseelse
begin
inc(i);
dec(j);
end;
end;
if flag then writeln('yes.')else writeln('no.');
end.
3樓：水藍希凌
直接用字串做比較簡單
var s,s1,s2:string;
i,le,t:longint;
begin
readln(s);
le:=length(s);
if odd(le) then t:=le div 2+1else t:=le div 2;
s1:=copy(s,1,t);
for i:=le downto t dos2:=s2+s[i];
if s1=s2 then writeln('yes') else writeln('no');
end.
初學者釣魚問題
在公園裡釣魚無需太長的竿子，買支三公尺六 五公尺四的手竿足矣！初學者沒必要買高檔的魚竿，選一支 光威 的 在一百到兩百元之間即可。其次就是釣線了，公園裡垂釣用1.5號主線就行了，太粗會影響上魚率。餌料的配置建議你用商品餌，因為公園裡的魚可能長期吃商品餌吃慣了，而且商品餌用著方便，比如 藍鯽二號，南極...
cad初學者怎麼畫櫥櫃圖，我是CAD初學者，畫廚櫃立體圖最開始要怎麼畫
土巴兔裝修 畫櫥櫃圖紙首先畫出櫥櫃的平面設計圖 地櫃分解圖 檯面圖 立體圖等等。設計平面布置圖時，要寫清楚圖紙是由內向外畫的，然後要標註地櫃的尺寸 吊櫃的尺寸以及總尺寸。檯面圖要標註檯面的寬度和炊具的位置 水槽位置。在標註時，炊具和水槽的中心線，都要以斷面處作為起點。還有立體圖再設計的時候，一定要標...
民謠吉他初學者需要注意哪些問題，吉他初學者（零基礎）需要注意什麼嗎？
一個假期完全可以自由彈唱大部分歌曲了 你只需要一把吉他 一本初級教材 吉他當然是民謠吉他 教材必須是初級的 不要買那樣的全是譜的 因為一開始學 肯定會碰到很多問題 初級教材上都有 再就是買個調音器 大部分初學者都不會調絃音不準肯定沒法彈 先學會調音 願不願意用撥片 看你的了 沒有規定說一定需要撥片 ...