package Ġp 6 Ċ Ċ import Ġmore . Input Ċ Ċ fun Ġmain ( args : ĠArray < String >) Ċ { ĊĠ Ġval Ġwords Ġ= ĠInput ĊĠĠĠĠĠ Ġ. get For (" p 6 ") ĊĠĠĠĠĠ Ġ. split ("\ n ") ĊĊĠ Ġprintln ( un jam ( words )) Ċ } Ċ Ċ fun Ġun jam ( input : ĠList < String >): ĠString Ċ { ĊĠ Ġreturn Ġ( 0 .. input . first (). last Index ) ĊĠĠĠĠĠ Ġ. map Ġ{ Ġindex Ġ-> ĊĠĠĠĠĠĠĠ Ġinput ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. map Ġ{ Ġit [ index ] Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. groupBy Ġ{ Ġit Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. map Values Ġ{ Ġit . value . size Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. toList () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. sorted By Ġ{ Ġit . second Ġ} Ċ // ĠĠĠĠĠĠĠĠĠĠĠ Ġ. reversed () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. first () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. first ĊĠĠĠĠĠ Ġ} ĊĠĠĠĠĠ Ġ. join ToString ("") Ċ } Ċ