BEGIN{FS=""}
{
  for(i=1;i<=(NF-1);i++){
    print $i$(i+1)
  }
}