program yb(input,output);
type
  s=array[1..20] of integer;
var
  n,i,a:integer;
  s1:s;
begin
  read(n);
   for i:=1 to 20 do
    read(s1[i]);
    a:=s1[1];
   for i:=1 to 20 do
   begin
    if a>s1[i] then
    begin
     a:=s1[i];
     n:=i;
    end;
   end;
  write('a=',a);
  write('n=',n);
  end.

program lt;
type
  hll=array[1..20] of integer;
var s:hll;
    i,n,m：integer;
begin
  for i:=1 to 20 do read(s[i]);
  n:=s[1];m:=1;
  for i:=2 to 20 do if s[i]<n then
                      begin n=s[i];m:=i; end;
  i:=s[m];s[m]:=s[1];s[1]:=i;
  for i:=1 to 20 write(s[i],'  ');
end.