#!perl -l
($a,$b,$t)=@ARGV;map{push@a,($c=$|--?$b:$a)x($a[$_]||$c)}0..$t;print@a[0..$t-1]