{{{#!highlight haskell
#include<stdio.h>
#include<string.h>
int main(){

int n,i,t=0,h=0;
char tarou[101],hanako[101];

scanf("%d",&n);
for(i=0;i<n;i++){
  scanf("%s %s",tarou,hanako);
  if(strcmp(tarou,hanako)>0){
    t+=3;
  }else if(strcmp(tarou,hanako)<0){
    h+=3;
  }else{
    t+=1;h+=1;
  }
}

printf("%d %d\n",t,h);

return(0);
}
}}}