#pragma GCC optimize ("Ofast")
#include<bits/stdc++.h>
using namespace std;
template<class S, class T> inline S min_L(S a,T b){
  return a<=b?a:b;
}
inline void rd(int &x){
  int k;
  int m=0;
  x=0;
  for(;;){
    k = getchar_unlocked();
    if(k=='-'){
      m=1;
      break;
    }
    if('0'<=k&&k<='9'){
      x=k-'0';
      break;
    }
  }
  for(;;){
    k = getchar_unlocked();
    if(k<'0'||k>'9'){
      break;
    }
    x=x*10+k-'0';
  }
  if(m){
    x=-x;
  }
}
inline void rd(char &c){
  int i;
  for(;;){
    i = getchar_unlocked();
    if(i!=' '&&i!='\n'&&i!='\r'&&i!='\t'&&i!=EOF){
      break;
    }
  }
  c = i;
}
inline int rd(char c[]){
  int i;
  int sz = 0;
  for(;;){
    i = getchar_unlocked();
    if(i!=' '&&i!='\n'&&i!='\r'&&i!='\t'&&i!=EOF){
      break;
    }
  }
  c[sz++] = i;
  for(;;){
    i = getchar_unlocked();
    if(i==' '||i=='\n'||i=='\r'||i=='\t'||i==EOF){
      break;
    }
    c[sz++] = i;
  }
  c[sz]='\0';
  return sz;
}
inline void wt_L(char a){
  putchar_unlocked(a);
}
inline void wt_L(int x){
  int s=0;
  int m=0;
  char f[10];
  if(x<0){
    m=1;
    x=-x;
  }
  while(x){
    f[s++]=x%10;
    x/=10;
  }
  if(!s){
    f[s++]=0;
  }
  if(m){
    putchar_unlocked('-');
  }
  while(s--){
    putchar_unlocked(f[s]+'0');
  }
}
template<class S> inline int arrEraseVal_L(S val1, S val2, S val3, int &sz, S a[]){
  int i;
  int n = sz;
  sz = 0;
  for(i=(0);i<(n);i++){
    if(a[i]!=val1 && a[i]!=val2 && a[i]!=val3){
      a[sz++] = a[i];
    }
  }
  return n - sz;
}
int N;
char S[200002];
int main(){
  int i;
  int k;
  int c1 = 0;
  int c9 = 0;
  int res;
  rd(N);
  rd(S);
  for(i=(0);i<(N);i++){
    S[i] -= '0';
  }
  res =arrEraseVal_L((char)3,(char)5,(char)7,N,S);
  for(i=(0);i<(N);i++){
    if(S[i]==1){
      c1++;
      continue;
    }
    if(c1){
      c1--;
      res++;
      continue;
    }
    c9++;
  }
  res += (k =min_L(c9/2, c1));
  res += (c1-k) / 2;
  wt_L(res);
  wt_L('\n');
  return 0;
}
// cLay varsion 20191108-1

// --- original code ---
// int N;
// char S[200002];
// {
//   int k, c1 = 0, c9 = 0, res;
//   rd(N,S);
//   rep(i,N) S[i] -= '0';
//   res = arrEraseVal((char)3,(char)5,(char)7,N,S);
//   rep(i,N){
//     if(S[i]==1) c1++, continue;
//     if(c1) c1--, res++, continue;
//     c9++;
//   }
//   res += (k = min(c9/2, c1));
//   res += (c1-k) / 2;
//   wt(res);
// }