// #pragma GCC optimize("Ofast")
// #pragma GCC optimize("unroll-loops")
// #pragma GCC target("sse,sse2,sse3,ssse3,sse4,popcnt,abm,mmx,avx,tune=native")
#include <bits/stdc++.h>
using namespace std;
typedef long long int ll;

int main(){
    cin.tie(nullptr);
    ios::sync_with_stdio(false);
    ll n,s; cin >> n >> s;
    vector<ll> p(s+1,1);
    for(ll i=2;i<=s;i++){
        p[i]=p[i-1]*i;
    }
    vector<int> used(s,0);
    vector<int> vec;
    for(int i=0;i<s;i++){
        ll nn=n/p[s-i-1];
        int cnt=0;
        for(int j=0;j<s;j++){
            if(used[j]==0){
                if(cnt==nn){
                    used[j]=1;
                    vec.push_back(j);
                    break;
                }
                cnt++;
            }
        }
        n%=p[s-i-1];
    }
    vector<int> tr(s);
    for(int i=0;i<s;i++){
        tr[vec[i]]=i;
        used[i]=0;
    }
    ll res=0;
    for(int i=0;i<s;i++){
        int cnt=0;
        for(int j=0;j<tr[i];j++){
            if(used[j]==0)cnt++;
        }
        res+=(ll)cnt*p[s-i-1];
        used[tr[i]]=1;
    }
    cout << res << endl;
}