LABEL prev,next;
var
data_arr:array[1..10] of integer; // массив данных
str_arr: string; // команды
i,j,k: integer; // индексы строки и массива
begin
j:=1;
i:=1;
readln(str_arr); //считываем строку
prev:
if i>length(str_arr) then goto next;
if (str_arr[i]='+') then data_arr[j]:= data_arr[j]+1;
if (str_arr[i]='-') then data_arr[j]:= data_arr[j]-1;
if (str_arr[i]='>') then j:=j+1;
if (str_arr[i]='<') then j:=j-1;
if (str_arr[i]='.') then write(chr(data_arr[j]));
i:=i+1;
goto prev;
next:
for k:=1 to 10 do begin
write(data_arr[k]);
write(' ');
end;
end.
TEFCRUwgcHJldixuZXh0Owp2YXIKIGRhdGFfYXJyOmFycmF5WzEuLjEwXSBvZiBpbnRlZ2VyOyAgICAvLyDQvNCw0YHRgdC40LIg0LTQsNC90L3Ri9GFCiBzdHJfYXJyOiBzdHJpbmc7ICAgICAgICAgICAgICAgICAgICAgLy8g0LrQvtC80LDQvdC00YsgIAogaSxqLGs6IGludGVnZXI7ICAgICAgICAgICAgICAgICAgICAgICAvLyDQuNC90LTQtdC60YHRiyDRgdGC0YDQvtC60Lgg0Lgg0LzQsNGB0YHQuNCy0LAKYmVnaW4KIGo6PTE7ICAgICAgICAgICAgICAgICAKIGk6PTE7CiByZWFkbG4oc3RyX2Fycik7ICAgICAgIC8v0YHRh9C40YLRi9Cy0LDQtdC8INGB0YLRgNC+0LrRgwogcHJldjoKIGlmIGk+bGVuZ3RoKHN0cl9hcnIpIHRoZW4gZ290byBuZXh0OyAKICAgIGlmIChzdHJfYXJyW2ldPScrJykgdGhlbiBkYXRhX2FycltqXTo9IGRhdGFfYXJyW2pdKzE7CiAgICBpZiAoc3RyX2FycltpXT0nLScpIHRoZW4gZGF0YV9hcnJbal06PSBkYXRhX2FycltqXS0xOwogICAgaWYgKHN0cl9hcnJbaV09Jz4nKSB0aGVuIGo6PWorMTsKICAgIGlmIChzdHJfYXJyW2ldPSc8JykgdGhlbiBqOj1qLTE7CiAgICBpZiAoc3RyX2FycltpXT0nLicpIHRoZW4gd3JpdGUoY2hyKGRhdGFfYXJyW2pdKSk7IAogICAgCiBpOj1pKzE7CiBnb3RvIHByZXY7CiBuZXh0Ogpmb3Igazo9MSB0byAxMCBkbyBiZWdpbiAKd3JpdGUoZGF0YV9hcnJba10pOwp3cml0ZSgnICcpOwplbmQ7CmVuZC4=