Lexicography(数学推论>>求按字典序排第k个排列）

Lexicography

Time Limit:1000MS     Memory Limit:131072KB     64bit IO Format:%lld & %llu

Submit Status Practice CSU 1563

Description

An anagram of a string is any string that can be formed using the same letters as the original. (We consider the original string an anagram of itself as well.) For example, the string ACM has the following 6 anagrams, as given in alphabetical order:

ACM AMC CAM CMA MAC MCA As another example, the string ICPC has the following 12 anagrams (in alphabetical order):

CCIP CCPI CICP CIPC CPCI CPIC ICCP ICPC IPCC PCCI PCIC PICC Given a string and a rank K, you are to determine the Kth such anagram according to alphabetical order.

Input

Each test case will be designated on a single line containing the original word followed by the desired rank K. Words will use uppercase letters (i.e., A through Z) and will have length at most 16. The value of K will be in the range from 1 to the number of distinct anagrams of the given word. A line of the form "# 0" designates the end of the input.

Output

For each test, display the Kth anagram of the original string.

Sample Input

ACM 5
ICPC 12
REGION 274
# 0

Sample Output

MAC
PICC
IGNORE

Hint

The value of K could be almost 245 in the largest tests, so you should use type long in Java, or type long long in C++ to store K.

 #include<stdio.h>
 #include<string.h>
 #include<algorithm>
 typedef long long ll ;
 char a[] ;
 int alp[] ;
 char map[] ;
 bool vis[] ;
 ll k ;
 int n ;

 ll fact (int n)
 {
     ll sum =  ;
     for (int i =  ; i <= n ; i ++) {
         sum *= 1ll * i ;
     }
     return sum ;
 }

 ll calc (int x)
 {
     int cnt =  ;
     for (int i =  ; i < n ; i++) {
         if (!vis[i]) cnt ++ ;
     }
     ll sum =  ;
     for (int i =  ; i < ; i++) {
         if (i + 'A' == a[x]) {
             if ( alp[i] -  > )  sum *=  fact (alp[i] - ) ;
         }
         else {
             if (alp[i] > ) sum *=  fact (alp[i]) ;
         }
     }
   //  printf ("cnt=%d, sum=%lld\n" , cnt , sum ) ;
     return fact (cnt - ) / sum ;
 }

 void dfs (int deep)
 {
     if (deep == n) return ;
     for (int i =  ; i < n;  i ++) {
      //   printf ("deep=%d,%c\n" , deep , a[i]) ;
         if (!vis[i] ) {
                 if (k - calc (i) > ) {
                    // printf ("%c , k=%lld , fact=%lld\n" , a[i] , k , calc (i)) ;
                     k -= calc ( i ) ;
                 }
                 else {
                     if (k == ) {

                     }
                     vis[i] =  ;
                     alp[a[i] - 'A'] -- ;
                     map[deep] = a[i] ;
                 //    printf ("k=%d\n" , k ) ;
              //       printf ("deep=%d , %c\n" , deep , map[deep]) ;
                     dfs (deep + ) ;
                     return ;
                 }
                 while (a[i + ] == a[i])  i ++ ;
         }
     }
 }

 int main ()
 {
    // freopen ("a.txt" , "r" , stdin ) ;
     while (scanf ("%s" , a) != NULL) {
         scanf ("%lld" , &k) ;
         if (a[] == '#' && k == ) break ;
         memset (alp ,  , sizeof(alp)) ;
         for (int i =  ; a[i] != '\0' ; i ++) {
             alp[a[i] - 'A'] ++ ;
         }
         n = strlen (a) ;
         std::sort (a , a + n ) ;
      /*   for (int i = 0 ; i < n ; i++) {
             printf ("%c" , a[i]) ;
         } puts ("") ;*/
         dfs () ;
         memset (vis ,  , sizeof(vis)) ;
         for (int i =  ; i < n ; i ++) printf ("%c" , map[i]) ; puts ("") ;
     }
     return  ;
 }