PROGRAM histogram;

const N=10000;
var b,x,y : Integer;
    A : array[2..12] of Integer;

function maksimum(const A: array[2..12]) : Integer;
   var i,n : Integer;
begin
   n := A[2];
   j := 2
   for i:= 2 to 12 do
      If n < A[i] then begin
      n := A[i];
      j := i
   end;
   maksimum := j;
end;

begin

   randomize;

   for b:=2 to 12 do
      A[b]:=0;

   for b:=1 to N do begin
      x := random(6)+1;
      y := random(6)+1;
      A[x+y]:= A[x+y]+1;
   end;

   for b:=2 to 12 do
       writeln((A[b]/N)*100:0:1,'% ');

end.