@input = ();
while($line = <STDIN>){
  chomp($line);
  push(@input, $line);
}
$result = "";
$i = 0;
while(++$i < 100) {
  foreach(@input) {
    print substr($_, 0, 1, "");
  }
}