n;s[];c(int*a){return 1[&a][2]-a[2];}main(a,b){for(;~scanf(~n%3?"%s":"%d",s+n);)n++;for(qsort(s,n/3,12,c);n--;)printf("%c %s %s %d\n",-(b%3?~b%3?'áÿ':'–~':5379014272)<<14>>n/3&1?84:70,s+n,s+n--,s[n--]);}