var
      a: array[1..3] of byte;
      i, g, h, a1: integer;
begin
      for i:=1 to 3 do   {получение трех цифр в массив}
       readln(a[i]);
      for i:=1 to 3 do   {тройной цикл, перебираем все комбинации}
       for g:=1 to 3 do
        for h:=1 to 3 do
         begin
          a1:=100*a[i]+10*a[g]+a[h];   {создаем трехзначное число}
          write(a1, ' ');   {выводим его на экран}
         end;
      readln;
end.