#include<iostream> // cin\cout\endl #include<cstring> // strcpy()\strcat()\strcmp()\strlen()\memset() using namespace std; string s1; int main(){ getline(cin,s1); int len1=s1.length(); int n=0; for(int i=0;i<len1;i++){ if(s1[i]>='a'&&s1[i]<='z'){ s1[i]=s1[i]-32; } } for(int i=0;i<len1;i++){ n++; if(s1[i]!=s1[i+1]){ cout<<'('<<s1[i]<<','<<n<<')'; n=0; } } cout<<endl; return 0; }