#include <bits/stdc++.h>
//#include <atcoder/all>
using namespace std;
//using namespace atcoder;
//using mint = modint1000000007;
//const int mod = 1000000007;
//using mint = modint998244353;
//const int mod = 998244353;
//const int INF = 1e9;
//const long long LINF = 1e18;
//const bool debug = false;
#define rep(i, n) for (int i = 0; i < (n); ++i)
#define rep2(i,l,r)for(int i=(l);i<(r);++i)
#define rrep(i, n) for (int i = (n-1); i >= 0; --i)
#define rrep2(i,l,r)for(int i=(r-1);i>=(l);--i)
#define all(x) (x).begin(),(x).end()
#define allR(x) (x).rbegin(),(x).rend()
#define endl "\n"
#define P pair<int,int>
template<typename A, typename B> inline bool chmax(A & a, const B & b) { if (a < b) { a = b; return true; } return false; }
template<typename A, typename B> inline bool chmin(A & a, const B & b) { if (a > b) { a = b; return true; } return false; }
const int dx[] = { 1,1,-1,-1 };
const int dy[] = { 1,-1,1,-1 };
int main() {
	ios::sync_with_stdio(false);
	cin.tie(nullptr);
	int n, m; cin >> n >> m;
	vector<int>p(n);
	rep(i, n)cin >> p[i];
	vector<int>a(n), b(n);
	rep(i, n)cin >> a[i] >> b[i];
	vector<int>c(m), d(m);
	rep(i, m)cin >> c[i] >> d[i];
	long long ans = 0;
	rep(i, 4) {
		map<P, long long>mp;
		rep(j, n) {
			int na = a[j] * dx[i];
			int nb = b[j] * dy[i];
			rep(k, m) {
				mp[{c[k] - na, d[k] - nb}] += p[j];
			}
		}
		for (auto p : mp) {
			chmax(ans, p.second);
		}
	}
	cout << ans << endl;
	return 0;
}