#include <iostream>
#include <string>
#include <vector>
#include <queue>
#include <stack>
#include <map>
#include <algorithm>
#include <sstream>
#include <cmath>
#include <set>
#include <iomanip>
#include <deque>
using namespace std;
typedef long long ll;

#define REP(i,n) for(int (i)=0;(i)<(int)(n);(i)++)
#define RREP(i,n) for(int (i)=(int)(n)-1;i>=0;i--)
#define FOREACH(i,Itr) for(auto (i)=(Itr).begin();(i)!=(Itr).end();(i)++)
#define REMOVE(Itr,n) (Itr).erase(remove((Itr).begin(),(Itr).end(),n),(Itr).end())
#define UNIQUE(Itr) sort((Itr).begin(),(Itr).end()); (Itr).erase(unique((Itr).begin(),(Itr).end()),(Itr).end())
#define LBOUND(Itr,val) lower_bound((Itr).begin(),(Itr).end(),(val))
#define UBOUND(Itr,val) upper_bound((Itr).begin(),(Itr).end(),(val))


ll dp[10010];

bool isPrime(long long n){
    if(n<=1)return false;
    if(n==2)return true;
    for(long long i=2;i*i<=n;i++){
        if((n%i)==0)return false;
    }
    return true;
}

int main(){
    
    ll M,N; cin>>M>>N;
    vector<ll> C(N);
    REP(i,N)cin>>C[i];
    
    REP(i,N){
        dp[C[i]]=max((ll)1,dp[C[i]]);
        for(ll j=0;j<10010;j++){
            if(j-C[i]>=0){
                if(dp[j-C[i]]>0){
                    dp[j]=max(dp[j-C[i]]+1,dp[j]);
                }
            }
        }
    }
    
    ll ans=0;
    for(ll i=0;i<=M;i++){
        if(isPrime(M-i)){
            ans+=dp[i];
        }
    }
    
   /* REP(i,501){
        if(dp[i]>0){
            cout<<i<<":"<<dp[i]<<endl;
        }
    }*/
    
    sort(C.begin(),C.end());
    ans+=M/C[0];
    
    cout<<ans<<endl;
    
    return 0;
}