#include<bits/stdc++.h>
using namespace std ;
typedef long long ll ;
typedef unsigned long long ull ;
typedef pair < int , int > pii ;
typedef vector<int> vi;
#define fi first
#define se second
mt19937 rng(chrono::high_resolution_clock::now().time_since_epoch().count());

#define rep(i, a, b) for(int i = a; i < (b); ++i)
#define all(x) begin(x), end(x)
#define sz(x) (int)(x).size()

map < char , int > w ;
int cnt[ 3 ][ 3 ] , tot[ 3 ][ 3 ] ;

int n ;
string a[ 1007 ] ;
int tp ;
int dp[ 12 ][ 12 ] ;


int brute ( int x , int rem , int mask , int dir ) {
    if ( dp[ rem ][ x ] != -1 ) { return dp[ rem ][ x ] ; }
    
    if ( rem > 0 ) {
        if ( brute ( ( x + dir + 3 ) % 3 , rem - 1 , mask , dir ) == 0 ) {
            dp[ rem ][ x ] = 1 ;
            return 1 ;
        }
    }
    if ( cnt[ x ][ x ] > 0 && ( mask & ( 1 << x ) ) == 0 ) {
        if ( brute ( x , rem , mask + ( 1 << x ) , dir ) == 0 ) {
            dp[ rem ][ x ] = 1 ;
            return 1 ;
        }
    }
    dp[ rem ][ x ] = 0 ;
    return 0 ;
}

int cyc ( int dir , int ori ) {
    int snake = 0 ;
    int mn = 1007 ; 
    for ( int i = 0 ; i < tp ; ++ i ) {
        cnt[ i ][ i ] %= 2 ;
    }
    if ( dir == 1 ) {
        mn = min ( { cnt[ 0 ][ 1 ] , cnt[ 1 ][ 2 ] , cnt[ 2 ][ 0 ] } ) ;
        snake = 3 * mn ;
        cnt[ 0 ][ 1 ] -= mn , cnt[ 1 ][ 2 ] -= mn , cnt[ 2 ][ 0 ] -= mn ;
        if ( cnt[ ori ][ ( ori + 1 ) % 3 ] > 0 ) {
            ++ snake ;
            if ( cnt[ ( ori + 1 ) % 3 ][ ( ori + 2 ) % 3 ] > 0 ) { ++ snake ; }
        }
    }
    else {
        mn = min ( { cnt[ 1 ][ 0 ] , cnt[ 2 ][ 1 ] , cnt[ 0 ][ 2 ] } ) ;
        snake = 3 * mn ;
        cnt[ 1 ][ 0 ] -= mn , cnt[ 2 ][ 1 ] -= mn , cnt[ 0 ][ 2 ] -= mn ;
        if ( cnt[ ori ][ ( ori - 1 + 3 ) % 3 ] > 0 ) {
            ++ snake ;
            if ( cnt[ ( ori - 1 + 3 ) % 3 ][ ( ori - 2 + 3 ) % 3 ] > 0 ) {
                ++ snake ;
            }
        }
    }
    int path_len = snake ;
    snake += cnt[ 0 ][ 0 ] + cnt[ 1 ][ 1 ] + cnt[ 2 ][ 2 ] ;
    if ( snake >= 0 ) { return ( ( snake % 2 ) == 1 ) ; }
    for ( int i = 0 ; i <= path_len + 1 ; ++ i ) {
        for ( int j = 0 ; j < 8 ; ++ j ) {
            dp[ i ][ j ] = -1 ;
        }
    }
    return brute ( ori , 0 , path_len , dir ) ;
}



int dfs ( int x , int id ) {
    if ( dp[ x ][ id ] != -1 ) { return dp[ x ][ id ] ; }
    for ( int i = 0 ; i < tp ; ++ i ) {
        if ( x == i ) { continue ; }
        if ( cnt[ x ][ i ] == 0 ) { continue ; }
        if ( dfs ( i , ( cnt[ i ][ i ] > 0 ) ) == 0 ) {
            dp[ x ][ id ] = 1 ;
            return 1 ;
        }
    }
    if ( id > 0 ) {
        if ( dfs ( x , 0 ) == 0 ) {
            dp[ x ][ id ] = 1 ;
            return 1 ;
        }
    }
    dp[ x ][ id ] = 0 ;
    return 0 ;
}

int dag ( int ori ) {
    for ( int i = 0 ; i < 4 ; ++ i ) {
        dp[ i ][ 0 ] = dp[ i ][ 1 ] = -1 ;
    }
    for ( int i = 0 ; i < tp ; ++ i ) {
        cnt[ i ][ i ] %= 2 ;
    }
    return dfs ( ori , ( cnt[ ori ][ ori ] > 0 ) ) ;
}

void solve ( ) {
    cin >> n ;
    tp = 0 ;
    for ( int i = 1 ; i <= n ; ++ i ) {
        cin >> a[ i ] ;
        int sz = a[ i ].size ( ) ;
        if ( w.find ( a[ i ][ 0 ] ) == w.end ( ) ) { w[ a[ i ][ 0 ] ] = tp ++ ; }
        if ( w.find ( a[ i ][ sz - 1 ] ) == w.end ( ) ) { w[ a[ i ][ sz - 1 ] ] = tp ++ ; }
    }
    for ( int i = 1 ; i <= n ; ++ i ) {
        int sz = a[ i ].size ( ) ;
        ++ tot[ w[ a[ i ][ 0 ] ] ][ w[ a[ i ][ sz - 1 ] ] ] ;
    }
    int ans = 0 ;
    for ( int ii = 0 ; ii < tp ; ++ ii ) {
        for ( int jj = 0 ; jj < tp ; ++ jj ) {
            for ( int t = 0 ; t < tp ; ++ t ) {
                for ( int z = 0 ; z < tp ; ++ z ) {
                    cnt[ t ][ z ] = tot[ t ][ z ] ;
                    if ( ii == t && jj == z ) { -- cnt[ t ][ z ] ; }
                }
            }
            if ( cnt[ ii ][ jj ] < 0 ) { continue ; }
            for ( int i = 0 ; i < tp ; ++ i ) {
                for ( int j = i + 1 ; j < tp ; ++ j ) {
                    int aux = min ( cnt[ i ][ j ] , cnt[ j ][ i ] ) ;
                    cnt[ i ][ j ] -= aux , cnt[ j ][ i ] -= aux ;
                }
            }
            if ( cnt[ 0 ][ 1 ] > 0 && cnt[ 1 ][ 2 ] > 0 && cnt[ 2 ][ 0 ] > 0 ) {
                ans += cyc ( 1 , jj ) * tot[ ii ][ jj ] ;
            }
            else if ( cnt[ 1 ][ 0 ] > 0 && cnt[ 2 ][ 1 ] > 0 && cnt[ 0 ][ 2 ] > 0 ) {
                ans += cyc ( -1 , jj ) * tot[ ii ][ jj ] ;
            }
            else {
                ans += dag ( jj ) * tot[ ii ][ jj ] ;
            }
        }
    }
    cout << n - ans << "\n" ;
}

int main ( ) {
    ios_base :: sync_with_stdio ( false ) ;
    cin.tie ( NULL ) ;
    int t = 1 ; // cin >> t ; 
    while ( t -- ) { solve ( ) ; }
    return 0 ;
}