#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]++;
    }
    d = 3;
    while (d * 3 <= x) {
        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;
}