#include <bits/stdc++.h>
#include <iostream>
#include <limits>
#include <numeric>
#include <type_traits>

using namespace std;

#define rep(i,n,m) for(ll (i)=(n);(i)<(m);(i)++)
#define rrep(i,n,m) for(ll (i)=(n);(i)>(m);(i)--)
using ll = long long;
const ll mod = 998244353;


int main(){

    ll N;
    cin >> N;

    int maxd[N+1];
    rep(i,0,N+1) maxd[i] = 1;

    rep(i,1,N+1){
        for (ll j = i*i ; j < N+1 ; j += i*i){
            maxd[j] = max((ll)maxd[j],i*i);
        }
    }

    int xlis[N+1];
    rep(i,0,N+1) xlis[i] = 0;
    rep(i,1,N+1){
        ll x = i / maxd[i];
        xlis[x]++;
    }

    //aの値が、 平方数 * そうでない数x は求まった
    //そうでない数xで分類すればよい
    //あとは適当にペア計算

    ll ans = 0;
    rep(i,0,N+1){
        ans += xlis[i]*((ll)xlis[i]);
    }

    cout << ans << endl;

}