/* (PARI) _R. J. Cano_, Sep 06 2018 - Begin */

searchTerms(howMany,{B=10})={
  my(L:list=List(),test,kounter,parity);
  for(x=B,+oo,
    test=digits(x,B);
	parity=test[1]%2;
	for(k=2,#test,
	  if(parity!=(test[k]%2),
	    listput(L,x);
	    kounter++;
	    if(kounter==howMany,return(L));
	    break
	  )
	)
  )
}

printList(L:list)={
  if(#L,
    if(#L==1,
	  print(L[1]";")
	,
      print1(L[1]);
      for(i=2,#L,
        print1(", "L[i])
      );
      print(";")
	)
  )
}

printList(searchTerms(63)); /* End */