others/volume1/051.pas


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

var
  n, i, v, a: int32;

begin
  readln(n, v);
  for i := 1 to n do
    begin
      read(a);
      if a = v then
        begin
          writeln('YES'#10, i);
          exit
        end;
    end;
  writeln('NO')
end.