File standardInput readLines map(split do(for($,at(0)at(0),at(1)at(0),$asCharacter repeated(at(2)asNumber)print))writeln)