program Losovani2;

var i : integer;
   tah: real;

begin
  Randomize;
  for i:=1 to 9 do
  begin
    tah:=random;
    write(tah:1:6, ', ');
  end;
  tah:=random;
  write(tah:1:6);
  readln();
end.
