program arrvergleichen (input, output);


var
z1arr:array[1..3] of integer = (1,8,4);
z2arr:array[1..3] of integer = (5,3,7);
sort:array[1..6] of integer;
z1 : Integer;
z2 : Integer;
sortIndex : integer;
one : integer;

begin
	z1 := 1;
	z2 := 1;
	one := 1;
	for sortIndex := 1 to 6 do
	begin
	if (z1 <= 3) and (z1arr[z1] <= z2arr[z2]) then
		begin
		sort[sortIndex] := z1arr[z1];
		z1 := z1 + 1;
		end
	else
		begin
		sort[sortIndex] := z2arr[z2];
		z2 := z2 + 1;
		end;
	end;

	for sortIndex := 1 to 6 do
		writeln (sort[sortindex]);
end.