首页 > 试题广场 >

var t: array[0..255] of long

[填空题]
var
  t: array[0..255] of longint;
  s: string;
  i: longint;
begin
  read(s);
  for i:=0 to 255 do
    t[i] := 0;
  for i:=1 to length(s) do
    inc(t[ord(s[i])]);
  for i:=1 to length(s) do
    if (t[ord(s[i])] = 1) then
    begin
      writeln(s[i]);
      exit;
    end;
  writeln('no');
end.

输入:xyzxyw
输出:1

这道题你会答吗?花几分钟告诉大家答案吧!