Bật mí sẽ có thêm nhà tài trợ lì xì thêm cho 10 bạn trong danh sách nhận quà nữa nha. Nhà tài trợ cũng bật mí rằng sẽ thưởng cho những bạn nhận được ít coin lì xì. Vì vậy chưa khẳng định được số coin mà bạn sẽ nhận được vào đêm đó sau khi lật ô số đâu đó :>

THÔNG BÁO: Thay đổi thời gian diễn so với dự kiện. Thời gian sự kiện diễn ra sẽ dời lại vào đêm Mùng 4. Hi vọng sẽ nhận được sự quan tâm của các bạn về sự kiện, chúc các bạn những ngày cuối năm vui vẻ!

Program GIAINEN;
Var s,st: string;
j,i,k,l: byte;
begin
readln(s);
while length(s)<>0 do
begin
for i:=1 to length(s) do
if s[i] in ['A'..'Z'] then st:=st+s[i]
else if s[i] in ['1'..'9'] then break;
for i:=1 to length(s) do
if s[i] in ['2'..'9'] then
begin
val(s[i],k);
l:=i;
break;
end;
for j:=1 to k do write(st);
delete(s,1,l);
st:='';
end;
readln
end.