#include <bits/stdc++.h>
using namespace std;

//////////////////////////////   Begin Macros

#define all(x) (x).begin(), (x).end()
#define rep(i, N) for (int i = 0; i < (int)(N); i++)
#define reprev(i, N) for (int i = (int)(N)-1; i >= 0; i--)
#define rep1(i, N) for (int i = 1; i <= (int)(N); i++)
#define rep1rev(i, N) for (int i = (int)(N); i >= 0; i--)
#define forbe(i, b, e) for (int i = (b); i < (e); i++)
#define forberev(i, b, e) for (int i = (e)-1; i >= (b); i--)
#define forfl(i, f, l) for (int i = (f); i <= (l); i++)
#define forflrev(i, f, l) for (int i = (l); i >= (f); i--)
using ll = long long int;
using pii = pair<int, int>;
using pil = pair<int, ll>;
using pli = pair<ll, int>;
using pll = pair<ll, ll>;

template <typename T>
bool chmax(T &m, const T q)
{
  if (m < q)
  {
    m = q;
    return true;
  }
  else
    return false;
}
template <typename T>
bool chmin(T &m, const T q)
{
  if (m > q)
  {
    m = q;
    return true;
  }
  else
    return false;
}
template <typename T1, typename T2>
pair<T1, T2> operator+(const pair<T1, T2> &l, const pair<T1, T2> &r) { return {l.first + r.first, l.second + r.second}; }
template <typename T1, typename T2>
pair<T1, T2> operator-(const pair<T1, T2> &l, const pair<T1, T2> &r) { return {l.first - r.first, l.second - r.second}; }
template <typename T>
pair<T, T> operator*(const pair<T, T> &l, const T &r) { return {l.first * r, l.second * r}; }
template <typename T>
pair<T, T> operator/(const pair<T, T> &l, const T &r) { return {l.first / r, l.second / r}; }
template <typename T>
istream &operator>>(istream &is, vector<T> &vec)
{
  for (auto &v : vec)
    is >> v;
  return is;
}
template <typename T>
ostream &operator<<(ostream &os, const vector<T> &vec)
{
  os << "[";
  for (auto v : vec)
    os << v << ",";
  os << "]";
  return os;
}
template <typename T>
ostream &operator<<(ostream &os, const deque<T> &vec)
{
  os << "deq[";
  for (auto v : vec)
    os << v << ",";
  os << "]";
  return os;
}
template <typename T>
ostream &operator<<(ostream &os, const set<T> &vec)
{
  os << "{";
  for (auto v : vec)
    os << v << ",";
  os << "}";
  return os;
}
template <typename T>
ostream &operator<<(ostream &os, const unordered_set<T> &vec)
{
  os << "{";
  for (auto v : vec)
    os << v << ",";
  os << "}";
  return os;
}
template <typename T>
ostream &operator<<(ostream &os, const multiset<T> &vec)
{
  os << "{";
  for (auto v : vec)
    os << v << ",";
  os << "}";
  return os;
}
template <typename T>
ostream &operator<<(ostream &os, const unordered_multiset<T> &vec)
{
  os << "{";
  for (auto v : vec)
    os << v << ",";
  os << "}";
  return os;
}
template <typename T1, typename T2>
ostream &operator<<(ostream &os, const pair<T1, T2> &pa)
{
  os << "(" << pa.first << "," << pa.second << ")";
  return os;
}
template <typename TK, typename TV>
ostream &operator<<(ostream &os, const map<TK, TV> &mp)
{
  os << "{";
  for (auto v : mp)
    os << v.first << "=>" << v.second << ",";
  os << "}";
  return os;
}
template <typename TK, typename TV>
ostream &operator<<(ostream &os, const unordered_map<TK, TV> &mp)
{
  os << "{";
  for (auto v : mp)
    os << v.first << "=>" << v.second << ",";
  os << "}";
  return os;
}

template <typename T>
void reset(vector<T> &v, const T reset_to)
{
  for (auto &x : v)
    x = reset_to;
}
inline int popcount(const unsigned int x) { return __builtin_popcount(x); }
#define dbg(x) cerr << #x << " = " << (x) << " (L" << __LINE__ << ") " << __FILE__ << endl;

ll nC2(ll n)
{
  return n * (n - 1) / 2;
}

const int intinf = numeric_limits<int>::max();
const ll llinf = numeric_limits<ll>::max();
const pii udlr[4] = {{1, 0}, {0, 1}, {-1, 0}, {0, -1}};

//////////////////////////////   End Macros

void solveA()
{
  int R;
  cin >> R;
  cout << 2 * M_PI * R << endl;
}

void solveB()
{
  int N, M;
  cin >> N >> M;
  vector<int> A(M);
  cin >> A;

  int dayfin = accumulate(all(A), 0);
  cout << max(N - dayfin, -1) << endl;
}

void solveC()
{
  int N;
  cin >> N;
  vector<int> A(N + 1);
  forfl(i, 2, N) cin >> A[i];

  vector<int> buka(N + 1);
  forfl(i, 2, N) buka[A[i]]++;

  rep1(i, N) cout << buka[i] << endl;
}

#include "Modulo.h"

void solveD()
{
  ll N, K;
  cin >> N >> K;

  Modint ans = 0;
  forfl(i, K, N + 1)
  {
    // dbg(i);
    ll M = (N + (N - i + 1)) * i / 2;
    ll m = (0LL + (i - 1)) * i / 2;
    // dbg(M);
    // dbg(m);
    ans += M - m + 1;
  }
  cout << ans << endl;
}

ll cal_happy(vector<int> &A, vector<pii> &pAi)
{
  ll ans = 0;
  int N = A.size();
  rep(i, N)
      ans += pAi[i].first * abs(pAi[i].second - i);
  return ans;
}

void solveE()
{
  int N;
  cin >> N;
  vector<int> A(N);
  cin >> A;

  ll ans = 0;
  forfl(j, 0, N % 2)
  {
    vector<pii> pAi1(N / 2), pAi2(N / 2);
    int mid = N / 2 + j;
    rep(i, mid) pAi1[i] = {A[i], i};
    rep(i, mid) pAi2[i] = {A[i + mid], i + mid};
    sort(all(pAi1));
    sort(all(pAi2));
    reverse(all(pAi2));
    pAi2.insert(pAi2.end(), all(pAi1));
    dbg(pAi2);
    chmax(ans, cal_happy(A, pAi2));
  }

  cout << ans << endl;
}

int main()
{
  // srand(time(0));
  cout << fixed << setprecision(15);

  solveA();
  return 0;
}
