void main()
{
    long n = readln.chomp.to!long;

    long a, b, ab;
    long cnt;
    foreach (i; 0 .. n)
    {
        string s = readln.chomp;
        cnt += s.count("AB");
        if (s[$-1] == 'A' && s[0] == 'B') ++ab;
        else if (s[$-1] == 'A') ++a;
        else if (s[0] == 'B') ++b;
    }

    if (ab > 0)
    {
        cnt += ab - 1;
        if (max(a, b) > 0) cnt += min(a, b) + 1;
    }
    else
    {
        cnt += min(a, b);
    }

    cnt.writeln;
}

import std.stdio;
import std.string;
import std.array;
import std.conv;
import std.algorithm;
import std.range;
import std.math;
import std.numeric;
import std.container;
import std.typecons;
import std.ascii;
import std.uni;