#include <bits/stdc++.h>
using namespace std;
int main(){
	char a[105];
	int i,c=0,b[26]={0};
	gets(a);
	for(i=0;a[i]!='.';i++)c++;
	for(i=0;i<=c;i++)b[a[i]-97]++;
	for(i=0;i<26;i++)
	{
		if(b[i]!=0)cout<<char(i+97);
	}
	cout<<endl;
	for(i=0;i<26;i++)
	{
		if(b[i]!=0)cout<<b[i];
	}
	return 0;
	}
/**************************************************************
	Problem: 1177
	User: ljl2
	Language: C++
	Result: Accepted
	Time:8 ms
	Memory:2072 kb
****************************************************************/