character(3)s,t 2 read*,s,t print*,merge(s(2:2),t(1:1),s(3:3)==s(2:2)) goto 2 end