var n,i,x,m: integer;
    a: array[1..1000] of integer;
function Min(a,b: integer): integer;
begin
    if a<=b then exit(a);
    exit(b);
end;

begin
    readln(n,x);
    m:=9999;
    for i:=1 to n do begin
        read(a[i]);
        m:=Min(m,a[i]);
    end;
    writeln(m);
    for i:=1 to n do begin
        if a[i] = m then write(i,' ');
    end;
end.

uses crt;
var n,i,x,min:integer;
a:array[1..100] of integer;
begin
clrscr;
readln(n,x);
for i:=1 to n do
 readln(a[i]);
min:=a[1];
for i:=2 to n do
 if a[i]<min then min:=a[i];
writeln('min=',min);
write('vi tri:');
for i:=1 to n do
 if a[i]=min then write(i,' ');
readln
end.