#include<bits/stdc++.h>
#define REP(i,n) for(int (i)=0;i<(int)(n);++(i))
#define REPIT(c,itr) for(__typeof((c).begin()) itr=(c).begin();itr!=(c).end();itr++)
#define PB push_back
#define FT first
#define SD second
#define ZERO(x) memset(x,0,sizeof(x))
#define NEG(x) memset(x,-1,sizeof(x))
#define RI(x) scanf("%d",&(x))
#define RII(x,y) scanf("%d%d",&(x),&(y))
#define RIII(x,y,z) scanf("%d%d%d",&(x),&(y),&(z))
#define OIII(x,y,z) printf("%d %d %d\n",(x),(y),(z))
#define OII(x,y) printf("%d %d\n",(x),(y))
#define OI(x) printf("%d\n",(x))
#define OL(x) cout<<(x)<<endl
#define OLL(x,y) cout<<(x)<<" "<<(y)<<endl
#define OLLL(x,y,z) cout<<(x)<<" "<<(y)<<" "<<(z)<<endl
#define RS(s) scanf("%s",(s))
#define MP(x,y) make_pair((x),(y))
#define SZ(x) ((int)(x).size())
#define FIN(f) freopen(f,"r",stdin)
#define FOUT(f) freopen(f,"w",stdout)
typedef long long LL;
using namespace std;
typedef pair<int,int> PII;
const int MOD = 1e9+7;
const int maxn = 111;
int n;
int a[11111];
int main(int argc, char const *argv[])
{
int t;
RI(t);
while(t--) {
RI(n);
REP(i,n)RI(a[i]);
sort(a,a+n);
int ans = 0;
int j=0;
for(int i=1;i<n;++i) {
while(a[j] <= a[i]-32)j++;
ans += i-j;
}
OI(ans);
}
return 0;
}
I2luY2x1ZGU8Yml0cy9zdGRjKysuaD4KI2RlZmluZSBSRVAoaSxuKSBmb3IoaW50IChpKT0wO2k8KGludCkobik7KysoaSkpCiNkZWZpbmUgUkVQSVQoYyxpdHIpIGZvcihfX3R5cGVvZigoYykuYmVnaW4oKSkgaXRyPShjKS5iZWdpbigpO2l0ciE9KGMpLmVuZCgpO2l0cisrKQojZGVmaW5lIFBCIHB1c2hfYmFjawojZGVmaW5lIEZUIGZpcnN0CiNkZWZpbmUgU0Qgc2Vjb25kCiNkZWZpbmUgWkVSTyh4KSBtZW1zZXQoeCwwLHNpemVvZih4KSkKI2RlZmluZSBORUcoeCkgbWVtc2V0KHgsLTEsc2l6ZW9mKHgpKQojZGVmaW5lIFJJKHgpIHNjYW5mKCIlZCIsJih4KSkKI2RlZmluZSBSSUkoeCx5KSBzY2FuZigiJWQlZCIsJih4KSwmKHkpKQojZGVmaW5lIFJJSUkoeCx5LHopIHNjYW5mKCIlZCVkJWQiLCYoeCksJih5KSwmKHopKQojZGVmaW5lIE9JSUkoeCx5LHopIHByaW50ZigiJWQgJWQgJWRcbiIsKHgpLCh5KSwoeikpCiNkZWZpbmUgT0lJKHgseSkgcHJpbnRmKCIlZCAlZFxuIiwoeCksKHkpKQojZGVmaW5lIE9JKHgpIHByaW50ZigiJWRcbiIsKHgpKQojZGVmaW5lIE9MKHgpIGNvdXQ8PCh4KTw8ZW5kbAojZGVmaW5lIE9MTCh4LHkpIGNvdXQ8PCh4KTw8IiAiPDwoeSk8PGVuZGwKI2RlZmluZSBPTExMKHgseSx6KSBjb3V0PDwoeCk8PCIgIjw8KHkpPDwiICI8PCh6KTw8ZW5kbAojZGVmaW5lIFJTKHMpIHNjYW5mKCIlcyIsKHMpKQojZGVmaW5lIE1QKHgseSkgbWFrZV9wYWlyKCh4KSwoeSkpCiNkZWZpbmUgU1ooeCkgKChpbnQpKHgpLnNpemUoKSkKI2RlZmluZSBGSU4oZikgZnJlb3BlbihmLCJyIixzdGRpbikKI2RlZmluZSBGT1VUKGYpIGZyZW9wZW4oZiwidyIsc3Rkb3V0KQp0eXBlZGVmIGxvbmcgbG9uZyBMTDsKdXNpbmcgbmFtZXNwYWNlIHN0ZDsKdHlwZWRlZiBwYWlyPGludCxpbnQ+IFBJSTsKY29uc3QgaW50IE1PRCA9IDFlOSs3Owpjb25zdCBpbnQgbWF4biA9IDExMTsKaW50IG47CmludCBhWzExMTExXTsKaW50IG1haW4oaW50IGFyZ2MsIGNoYXIgY29uc3QgKmFyZ3ZbXSkKewogICAgaW50IHQ7CiAgICBSSSh0KTsKICAgIHdoaWxlKHQtLSkgewogICAgICAgIFJJKG4pOwogICAgICAgIFJFUChpLG4pUkkoYVtpXSk7CiAgICAgICAgc29ydChhLGErbik7CiAgICAgICAgaW50IGFucyA9IDA7CiAgICAgICAgaW50IGo9MDsKICAgICAgICBmb3IoaW50IGk9MTtpPG47KytpKSB7CiAgICAgICAgICAgIHdoaWxlKGFbal0gPD0gYVtpXS0zMilqKys7CiAgICAgICAgICAgIGFucyArPSBpLWo7CiAgICAgICAgfQogICAgICAgIE9JKGFucyk7CiAgICB9CiAgICByZXR1cm4gMDsKfQ==