Create subprograma numeroentero