/*
	  Author : @evenbao
	  Created : 2020 / 07 / 12
*/

#ifdef _MSC_VER
#define _CRT_SECURE_NO_WARNINGS
#endif

#include<bits/stdc++.h>

using namespace std;

typedef long long LL;

#define pii pair<int , int>
#define mp make_pair
#define fi first
#define se second

template <typename T> inline void chkmax(T &x , T y) { x = max(x , y); }
template <typename T> inline void chkmin(T &x , T y) { x = min(x , y); }
template <typename T> inline void read(T &x) {
    T f = 1; x = 0;
    char c = getchar();
    for (; !isdigit(c); c = getchar()) if (c == '-') f = -f;
    for (; isdigit(c); c = getchar()) x = (x << 3) + (x << 1) + c - '0';
    x *= f;
}

const int N = 1000 + 10;
const int mod = (int) 1e9 + 7;

int n , K;
int a[N] , binom[N][N] , dp[N][N];

inline void inc(int &x , int y) { x = x + y < mod ? x + y : x + y - mod; }
inline void dec(int &x , int y) { x = x - y >= 0 ? x - y : x - y + mod; }
inline int quickpow(int a , int n) {
		int b = a , res = 1;
		for (; n >>= 1; a = (LL) a * a % mod)
				if (n & 1) res = (LL) res * a % mod;
		return res;
} 

int main() {
		
		read(n); read(K);
		for (int i = 1; i <= K; ++i) read(a[i]);
		for (int i = 0; i <= n; ++i) {	
				binom[i][0] = binom[i][i] = 1;
				for (int j = 1; j < i; ++j)
						binom[i][j] = (binom[i - 1][j] + binom[i - 1][j - 1]) % mod;
		}		
		dp[0][0] = 1;
		for (int i = 1; i <= K; ++i)
		for (int j = 0; j <= n; ++j)
		for (int k = 0; k <= j; ++k)
				if (a[i] >= j - k)
						inc(dp[i][j] , (LL) dp[i - 1][k] * binom[n - k][j - k] % mod * binom[n - j + k][a[i] - j + k] % mod);
		printf("%d\n" , dp[K][n]);
	  return 0;
}
