#include <iostream>
#include <iomanip>
#include <vector>
#include <algorithm>
#include <cmath>
#include <map>

#define FORR(i,b,e) for(int i=(b);i<(int)(e);++i)
#define FOR(i,e) FORR(i,0,e)
#define ALL(c) begin(c), end(c)
#define sortuniq(v) sort(v.begin(), v.end()), v.erase(unique(v.begin(),v.end()),v.end())
#define dump(var) cerr << #var ": " << var << "\n"
#define dumpc(con) for(auto& e: con) cerr << e << " "; cerr<<"\n"

typedef long long ll;
typedef unsigned long long ull;

const double EPS = 1e-6;
const int d4[] = {0, -1, 0, 1, 0};

using namespace std;


int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);

    ll x;
    cin >> x;

    map<ll,int> pcnt;
    ll d = 2;
    while (x % d == 0) {
        x /= d;
        pcnt[d]++;
    }
    if (x > 1) {
        ll limit = (ll)sqrt(x) + 1;
        d = 3;
        while (x <= limit) {
            while (x % d == 0) {
                x /= d;
                pcnt[d]++;
            }
            d += 2;
        }
        if (x > 1) pcnt[x]++;
    }

    ll y = 1;
    for (auto &p: pcnt) {
        if (p.second % 2 == 1) y *= p.first;
    }
        
    cout << y << endl;

    return 0;
}