program a1;
var a:array [1..2,1..3] of integer;
    k: integer;
    i,j: integer;
begin

  {Вводим в массив числа}
  for j:=1 to 3 do
    for i:=1 to 2 do
      read(a[i,j]);
      
  {Чтобы не писать 2 раза то, что ниже в цикле}
  for i:=1 to 2 do
    begin
    k:=a[i,1];
    a[i,1]:=a[i,3];
    a[i,3]:=k;
    end;

  {Пустая строка, чтобы разделить ввод и вывод}
  writeln;

  {Вывод информации на экран}   
  for j:=1 to 3 do 
    begin                   
    for i:=1 to 2 do
      write(a[i,j],' ');
    writeln;
    end;

end.