#include <iostream>
#include <vector>
#include <map>
#include <set>
#include <queue>
#include <algorithm>
#include <string>
#include <cmath>
#include <cstdio>
#include <iomanip>
#include <fstream>
#include <cassert>
#include <cstring>
#include <unordered_set>
#include <unordered_map>
#include <numeric>
#include <ctime>
#include <bitset>
#include <complex>
#include <random>

using namespace std;

#define int long long

const int MOD = 1e9 + 7;

int add(int a, int b) {
    return (a + b) % MOD;
}

int mul(int a, int b) {
    return (a * b) % MOD;
}

int binpow(int a, int b) {
    int res = 1;
    while (b) {
        if (b & 1) res = mul(res, a);
        a = mul(a, a);
        b >>= 1;
    }
    return res;
}

const int K = 21;
const int N = 1004;

int fact[N];
int C[N][N];

void init() {
    C[0][0] = 1;
    for (int i = 1; i < N; i++) {
        C[i][0] = 1;
        for (int j = 1; j <= i; j++) {
            C[i][j] = add(C[i - 1][j - 1], C[i - 1][j]);
        }
    }
    fact[0] = 1;
    for (int i = 1; i < N; i++) {
        fact[i] = mul(i, fact[i - 1]);
    }
}

int dp[K][N];

signed main() {
    ios_base::sync_with_stdio(false);
    cin.tie(0);

    init();

    int n, k;
    cin >> n >> k;
    vector<int> a(k);
    for (auto &t : a) {
        cin >> t;
    }
    dp[0][0] = 1;
    for (int i = 0; i < k; i++) {
        for (int cnt = 0; cnt <= n; cnt++) {
            for (int x = 0; x + cnt <= n && x <= a[i]; x++) {
                int cf = C[n - x][a[i] - x];
                cf = mul(cf, binpow(fact[x], MOD - 2));
                dp[i + 1][x + cnt] = add(dp[i + 1][x + cnt], mul(dp[i][cnt], cf));
            }
        }
    }
    cout << mul(dp[k][n], fact[n]) << endl;
}   