S=Subsets[{"Carlos","Camilo","Stefan","David","Santiago","Juan Pablo","Fabrice"},{2}]

RandomSample[Flatten[Join[{S,Reverse/@S}],1]]