不是VIP会员,不能显示答案

题目解答

题目:
第2题:请写出程序运行后变量ok的值(每空3分)
program xx07_2;
var s:string;
k,n:integer;ok:boolean;
begin
readln(s);n:=length(s);
k:=1;ok:=true;
while ok and (k<=n div 2) do
if s[k]<>s[n+1-k] then ok:=false
else k:=k+1;
writeln(ok);
end.
①输入:123,输出为:_______
②输入:121,输出为:_______
输出:FALSE|TRUE
考点:
分析:
解答:
评论:
老师: