C[ctt]:=B[j]; inc(ctt); inc(j); end else begin ;
C[ctt].pp:=A[i].pp; inc(ctt); inc(i); inc(j); end; end
else if (i
else if (j for i:=0 to ctt-1 do write(' ',C[i].cc,' ',C[i].pp); writeln(); end.
C[ctt]:=B[j]; inc(ctt); inc(j); end else begin ;
C[ctt].pp:=A[i].pp; inc(ctt); inc(i); inc(j); end; end
else if (i
else if (j for i:=0 to ctt-1 do write(' ',C[i].cc,' ',C[i].pp); writeln(); end.