ll@t;
rep(t){
	ll@n,w=0,z[20];
	n=81181819-n;
	while(n){
		ll a=0;
		for(ll b=1d7;b;b/=10){
			if(n/b%10>=8){
				a+=b*8;
				n-=b*8;
			}else if(n/b%10){
				a+=b;
				n-=b;
			}
		}
		z[w++]=a;
	}
	wtLn(w,z(w));
}