满江紫求救！！！

#include<bits/stdc++.h>
using namespace std;
void strtoint(char str[],int re[]){
	int len=0;
	for(len=0;str[len]!='\0';len++){
	  	;
	}
	re[0]=len;
	for(int i=1,j=len-1;i<=len;i++,j--){
		re[i]=str[j]-'0';
	}
}
void ajj(int a[],int b[]){
	int i;
	for(i=1;i<=a[0];i++){
		if(a[i]<b[i])
		{
			a[i]+=10;
			a[i+1]-=1;
		}
		a[i]-=b[i];
	}
	while(a[i]==0)
	{
		i--;
	}
	a[0]=i;
}
int cmp(int a[],int b[]){
	if(a[0]>b[0]){
		return 1;
	}else if(b[0]>a[0]){
		return -1;
	}else {
		for(int i=a[0];i>=1;i--){
			if(a[i]>b[i])
				return 1;
			if(b[i]>a[i])
				return -1;
		}
		return 0;
	}
}
int copy(int b[],int t[],int x){
	for(int i=0;i<=310;i++){
		t[i]=0;
	}
	for(int i=1;i<=b[0];i++){
		t[i+x-1]=b[i];
	}
	t[0]=b[0]+x-1;
}
int main(){
	 char str[310];
	 cin>>str;
	 int a[310]={0},b[310]={2,3,1},c[310]={0},t[310]={0};
	 strtoint(str,a);
	 int len=a[0]-b[0]+1;
	 for(int i=len;i>=1;i--)
	 {
		copy(b,t,i);
	  	while(cmp(a,t)>=0){
			c[i]++;
		  	ajj(a,t);
	  	}
	 }
	 while(c[len]==0){
	  	len--;
	 }
	 c[0]=len;
	 if(c[0]==0){
	  	cout<<0;
	 }else {
	  	for(int i=c[0];i>=1;i--){
	  		cout<<c[i];
	  	}
	 }
	 cout<<endl;
	 if(a[0]==0){
	  	cout<<0;
	 }else{
	  	for(int i=a[0];i>=1;i--){
	  		cout<<a[i];
	  	}
	}
}