m@main=getLine>>=putStrLn.f[]>>m
f[a:x]""=x
f(s@ ~((u:a):(v:b):t))(w:x)|w<'+'=r#r|w<'-'=""#""|w<'/'=r#""|w<'a'="*+-/"#r|0<1=f([' ',w]:s)x where a%s|elem a s= \x->w:'(':x++")"|0<1=(w:);p#q=f(((v%q)b++(u%p)a):t)x;r="+-"