Const
auto = false;
var
a: array[1..5000]of integer;
n, i, k, min: integer;
begin
if auto then begin
n := random(100);
for i := 1 to n do
a[i] := random(200);
end
else begin
readln(n);
for i := 1 to n do
read(a[i]);
end;
min := a[1];
for i := 1 to n do
begin
if min > a[i] then min := a[i];
if a[i] > 10.5 then k := k + 1;
end;
writeln(min, ' ', k);
end.