#include #include #include #define Add(x, y) (x + y >= mod) ? (x + y - mod) : (x + y) #define lowbit(x) x & (-x) #define pi pair #define pii pair> #define iip pair, ll> #define ppii pair, pair> #define ls(k) k << 1 #define rs(k) k << 1 | 1 #define fi first #define se second #define full(l, r, x) for(auto it = l; it != r; ++it) (*it) = x #define Full(a) memset(a, 0, sizeof(a)) #define open(s1, s2) freopen(s1, "r", stdin), freopen(s2, "w", stdout); #define For(i, l, r) for(register int i = l; i <= r; ++i) #define _For(i, l, r) for(register int i = r; i >= l; --i) using namespace std; using namespace __gnu_pbds; typedef double db; typedef unsigned long long ull; typedef long long ll; bool Begin; const int N = 35; inline ll read(){ ll x = 0, f = 1; char c = getchar(); while(c < '0' || c > '9'){ if(c == '-') f = -1; c = getchar(); } while(c >= '0' && c <= '9'){ x = (x << 1) + (x << 3) + (c ^ 48); c = getchar(); } return x * f; } inline void write(ll x){ if(x < 0){ putchar('-'); x = -x; } if(x > 9) write(x / 10); putchar(x % 10 + '0'); } int n; int a[N], dp[N][N], v[3]; bool End; int main(){ // open("kettle.in", "kettle.out"); v[0] = read(), v[1] = read(), v[2] = read(), n = read(); for(int i = 1; i <= n; ++i) a[i] = read(); sort(v, v + 3); sort(a + 1, a + n + 1); dp[1][0] = 1; for(int i = 1; i <= n; ++i){ int s = 0; for(int j = 0; j < 3; ++j) if(v[j] <= a[i]) ++s; for(int j = 0; j < 4; ++j){ if(s == j) dp[i + 1][j] += dp[i][j] * 2ll; else if(s > j){ dp[i + 1][j] += dp[i][j]; dp[i + 1][j + 1] += dp[i][j]; } } } write(dp[n + 1][3]); cerr << '\n' << abs(&Begin - &End) / 1048576 << "MB"; return 0; }