#include <iostream>
#include <vector>
#include <cassert>
#include <algorithm>
#include <functional>
#include <cmath>
#include <queue>
#include <set>
#include <stack>
#include <deque>
#include <map>
#include <iomanip>
#include <limits>
using ll = long long;
using ld = long double;
int MOD = 1e9 + 7;
using namespace std;
struct UnionFind
{
    vector<int> par; // par[i]:iの親の番号　(例) par[3] = 2 : 3の親が2

    UnionFind(int N) : par(N)
    { //最初は全てが根であるとして初期化
        for (int i = 0; i < N; i++)
            par[i] = i;
    }

    int root(int x)
    { // データxが属する木の根を再帰で得る：root(x) = {xの木の根}
        if (par[x] == x)
            return x;
        return par[x] = root(par[x]);
    }

    void unite(int x, int y)
    {                     // xとyの木を併合
        int rx = root(x); //xの根をrx
        int ry = root(y); //yの根をry
        if (rx == ry)
            return;   //xとyの根が同じ(=同じ木にある)時はそのまま
        par[rx] = ry; //xとyの根が同じでない(=同じ木にない)時：xの根rxをyの根ryにつける
    }

    bool same(int x, int y)
    { // 2つのデータx, yが属する木が同じならtrueを返す
        int rx = root(x);
        int ry = root(y);
        return rx == ry;
    }
};
int dx[] = {-1, 0, 1, 0};
int dy[] = {0, -1, 0, 1};
vector<vector<char>> vec;
vector<vector<int>> reg;
int h, w;
void dfs(int y, int x, int temp, char color)
{
    reg[y][x] = temp;
    color = vec[y][x];
    for (int i = 0; i < 4; i++)
    {
        if (y + dy[i] >= 0 && y + dy[i] < h && x + dx[i] >= 0 && x + dx[i] < w && reg[y + dy[i]][x + dx[i]] == -1 && vec[y + dy[i]][x + dx[i]] != color)
        {
            dfs(y + dy[i], x + dx[i], temp, color);
        }
    }
    return;
}
int main()
{
    ld m,n;cin>>m>>n;
    vector<ld> dp(n+1);
    dp[0]=m;
    for(int i=1;i<=n;i++){
        dp[i]=(dp[i-1]*2)/3+(dp[i-1]+1)/3;
    }
    cout<<setprecision(20)<<dp[n]<<endl;
}