#include <iostream>
#include <iomanip>
#include <vector>
#include <algorithm>
#include <numeric>
#include <functional>
#include <cmath>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <sstream>
#include <string>
#define repd(i,a,b) for (int i=(int)(a);i<(int)(b);i++)
#define rep(i,n) repd(i,0,n)
#define all(x) (x).begin(),(x).end()
#define mod 1000000007
#define inf 2000000007
#define mp make_pair
#define pb push_back
typedef long long ll;
using namespace std;
template <typename T>
inline void output(T a, int p) {
    if(p) cout << fixed << setprecision(p)  << a << "\n";
    else cout << a << "\n";
}
// end of template

int main() {
    cin.tie(0);
    ios::sync_with_stdio(0);
    // source code
    int N;
    cin >> N;
    vector<int> A(3);
    rep(i, N) {
        int a;
        cin >> a;
        A[a % 3]++;
    }
    
    if(A[0] == N){
        output(1, 0);
        return 0;
    }
    
//    vector<int> B = A;
//    // 1??????
//    int one = A[0];
//    if(A[1] > 0){
//        one++, A[1]--;
//        while(1){
//            if(A[1] > 0){
//                one++, A[1]--;
//            }
//            else break;
//            if(A[2] > 0){
//                one++, A[2]--;
//            }
//            else break;
//        }
//    }
//    if(A[0] + A[1] + A[2] > 0) one++;
//    int two = B[0];
//    if(B[2] > 0){
//        two++, B[2]--;
//        while(1){
//            if(B[2] > 0){
//                two++, B[2]--;
//            }
//            else break;
//            if(B[1] > 0){
//                two++, B[1]--;
//            }
//            else break;
//        }
//    }
//    if(B[0] + B[1] + B[2] > 0) two++;
    int ma = max(A[1], A[2]), mi = min(A[1], A[2]);
    int ret = A[0];
    ret += mi * 2;
    ret += min(3, ma - mi);
    output(ret, 0);
    return 0;
}