var a,b,c,d,e,f,n:longint;
begin
read(n);
a:=n div 100000;
writeln(a);
b:=n mod 100000 div 10000;
writeln(b);
c:=n mod 100000 mod 10000 div 1000;
writeln(c);
d:=n mod 100000 mod 10000 mod 1000 div 100;
writeln(d);
e:=n mod 100000 mod 10000 mod 1000 mod 100 div 10;
writeln(e);
f:=n mod 100000 mod 10000 mod 1000 mod 100 mod 10 div 1;
writeln(f);
end.
/**************************************************************
	Problem: 1611
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/