main=do
a<-getLine
let b=map(\x->replicate x '*')(map(read::String->Int)(words a))
mapM_ putStrLn b