C++ :

#include<bits/stdc++.h>
using namespace std;
string s; 
int p[14],k[14],h[14],t[14],pp,kk,hh,tt; 
int main()
{
	cin>>s;
	for(int i=0;i<=s.size()-3;i+=3)
	{
		int x=0;
		x=(s[i+1]-'0')*10+(s[i+2]-'0');
		if(s[i]=='P') p[x]++;
		if(s[i]=='K') k[x]++;
		if(s[i]=='H') h[x]++;
		if(s[i]=='T') t[x]++;	
	}
	for(int i=1;i<=13;i++)
	{
		if(p[i]>1) {cout<<"GRESKA";return 0;}	
		if(p[i]==0)	pp++;
	}
	for(int i=1;i<=13;i++)
	{
		if(k[i]>1) {cout<<"GRESKA";return 0;}	
		if(k[i]==0)	kk++;			
	}
	for(int i=1;i<=13;i++)
	{
		if(h[i]>1) {cout<<"GRESKA";return 0;}	
		if(h[i]==0)	hh++;			
	}
	for(int i=1;i<=13;i++)
	{
		if(t[i]>1) {cout<<"GRESKA";return 0;}	
		if(t[i]==0)	tt++;			
	}	
	cout<<pp<<" "<<kk<<" "<<hh<<" "<<tt;
    return 0;
}