program cogs370;
var
   x,n,i:longint;
   d:double;
   a:array[1..30]of longint;
   procedure init;
begin
     assign(input,'freq.in');reset(input);
     assign(output,'freq.out');rewrite(output);
end;
procedure main;
begin
     readln(n);
     for i:=1 to n do
     begin
          readln(x);
          inc(a[x]);
     end;
     for i:=1 to 30 do
     begin
          write(i,':');
          d:=a[i]/n;
          write(d*100:0:1);
          write('%');
          writeln;
     end;
end;
begin
     init;
     main;
end.