using namespace std;
#include<bits/stdc++.h>
void _main();int main(){cin.tie(0);ios::sync_with_stdio(false);cout<<fixed<<setprecision(15);_main();return 0;}
#pragma GCC target("avx2")
#pragma GCC optimize("O3")
#pragma GCC optimize("unroll-loops")
typedef long long ll;typedef long double ld;template<class ll>inline bool chmax(ll&a,ll b){if(a<b){a=b;return 1;}return 0;}template<class ll>inline bool chmin(ll& a,ll b){if(a>b){a=b;return 1;}return 0;}
#define rep(i, star,fini) for(int i=star;i<fini;i++)
#define ALL(x) std::begin(x),std::end(x)
#define INF ((1LL<<62)-(1LL<<31))
#define bit(x,i) (((x)>>(i))&1)
inline void scan(){}
template<class Head,class... Tail>
inline void scan(Head&head,Tail&... tail){std::cin>>head;scan(tail...);}
#define LL(...) ll __VA_ARGS__;scan(__VA_ARGS__)
#define STR(...) string __VA_ARGS__;scan(__VA_ARGS__)
inline void print(){}
template<class Head,class... Tail>
inline void print(Head&head,Tail&... tail){std::cout<<head<<" ";print(tail...);cout<<endl;}
template<typename T>
std::istream &operator>>(std::istream&is,std::vector<T>&v){for(T &in:v){is>>in;}return is;}
template<typename T>
std::ostream &operator<<(std::ostream&os,const std::vector<T>&v){for(auto it=std::begin(v);it!=std::end(v);){os<<*it<<((++it)!=std::end(v)?" ":"");}return os;}
long double my_distance(long double xi,long double yi,long double xj,long double yj){return sqrt(abs((xi-xj)*(xi-xj))+abs((yi-yj)*(yi-yj)));}
//Union-Find from https://zenn.dev/reputeless/books/standard-cpp-for-competitive-programming/viewer/union-find
class UnionFind{public:UnionFind()=default;explicit UnionFind(size_t n):m_parentsOrSize(n, -1){}int find(int i){if(m_parentsOrSize[i]<0){return i;}return(m_parentsOrSize[i]=find(m_parentsOrSize[i]));}void merge(int a,int b){a=find(a);b=find(b);if(a!=b){if(-m_parentsOrSize[a]<-m_parentsOrSize[b]){std::swap(a,b);}m_parentsOrSize[a]+=m_parentsOrSize[b];m_parentsOrSize[b]=a;}}bool connected(int a,int b){return (find(a)==find(b));}int size(int i){return -m_parentsOrSize[find(i)];}private:std::vector<int>m_parentsOrSize;};
//ll MOD = INF;
//ll MOD = 1000000007;
ll MOD = 998244353;
ll modpow(ll a,ll n){ll res=1;while(n>0){if(n&1)res=res*a%MOD;a=a*a%MOD;n>>=1;}return res;}
ll modinv(ll a){return modpow(a,MOD-2);}
bool iskaibun(string s){ll k = s.size();rep(i,0,k/2){if(s[i]!=s[k-1-i]){return false;}}return true;}
struct BIT_t{private:vector<ll> bit_t;int N;public:BIT_t(int size){N = size;bit_t.resize(N+1);}void add(int a, int w){for(int x=a;x<=N;x+=x&-x)bit_t[x]+=w;}int sum(int a){ll ret=0;for(int x=a;x>0;x-=x&-x) ret += bit_t[x];return ret;}};
ll tentou(vector<ll>* v_t){BIT_t v_t_BIT(*max_element(ALL(*v_t))+2);ll res=0,num=0;for(auto&&i:*v_t){res += num-v_t_BIT.sum(i+1);v_t_BIT.add(i+1,1);}return res;}
//string replace(string &replacedStr,string from,string to) {ll pos=0;int toLen = to.length();while((pos=replacedStr.find(from,pos))!=string::npos){replacedStr.replace(pos, from.length(), to);pos += toLen;}return replacedStr;}
#include <atcoder/all>
using namespace atcoder;
string replace(const string&moto,const string &from, const string&too) {
  int from_len = from.size();
  string tmp = from + moto;
  int tmp_len = tmp.size();
  vector<int> za = z_algorithm(tmp);
  string ret = "";
  for (int i = from_len; i < tmp_len;) {
    if (za[i] >= from_len) {
      ret += too;
      i += from_len;
    } else {
      ret += tmp[i];
      i++;
    }
  }
  return ret;
}

ll zaatu(vector<ll>&A){
    map<ll,ll>m;
    for(auto&&x:A)m[x]=0;
    ll ret = 0;
    for(auto&&[key,val]:m)val=ret++;
    for(auto&&x:A)x=m[x];
    return ret;
}
pair<ll,ll>pairmax(pair<ll,ll>a,pair<ll,ll>b){
    if(a.first+a.second==b.first+b.second){
        if(a.first>b.first)return a;
        else return b;
    }
    if(a.first+a.second>b.first+b.second)return a;
    else return b;
}

vector<ll>enumdiv(ll n){
    vector<ll>s;
    for(ll i = 1;i*i<=n;i++){
        if(n%i==0){s.push_back(i);if(i*i!=n)s.push_back(n/i);}
        
    }
    return s;
}
using mint = modint998244353;
ll dp[200025];
void _main(){
    LL(n,a,b,c);
    ll ans = 0;
    vector<ll>val = {a,b,c},cnt = {3,5,10};

    rep(i,0,n){
        rep(j,0,3){
            chmax(dp[i+cnt[j]],dp[i]+val[j]);
        }
    }
    cout<<dp[n]<<endl;
}