#include <iostream>
#include <cstring>
#include <cstdio>

using namespace std;

int main()
{
	freopen("input.txt", "r", stdin);
	freopen("output.txt", "w", stdout);
	
	char s[10000], s1[10000];
	int m[10000];
	int a[10000], b[10000];
	int i, j=0, n, c=1;

	cin >> s;
	n = strlen(s);
	for(i = 0; i < n; i++)
		m[i]=s[i]-'0';
	//for(i = 0; i < n; i++)
	//	cout << m[i] << endl;

	for(i=1;i<n+1;i++)
		if(m[i-1]==m[i]) c++;
		else 
		{
			a[j]=c;
			b[j]=m[i-1];
			j++;
			c=1;
		}

	for(i = 0; i< j; i++)
		cout << a[i] << b[i]; 



	

	return 0;
}