fun Ġmain ( args : ĠArray < out ĠString >) Ġ{ ĊĠĠĠ Ġvar Ġ( a , Ġb ) Ġ= Ġread Line () !!. split (" Ġ"). map Ġ{ Ġit . toInt () Ġ} ĊĊĠĠĠ Ġvar Ġoperation Per mitted Ġ= Ġ 1 ĊĠĠĠ Ġwhile Ġ( a Ġ!= Ġb Ġ&& Ġa Ġ< Ġb ) Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( b Ġ% Ġ 2 Ġ== Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġb Ġ/= Ġ 2 ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġif Ġ( b Ġ% Ġ 1 0 Ġ== Ġ 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġb Ġ/= Ġ 1 0 ĊĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġbreak ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġoperation Per mitted Ġ+= Ġ 1 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġif Ġ( a Ġ== Ġb ) Ġ{ ĊĠĠĠĠĠĠĠ Ġprintln ( operation Per mitted ) ĊĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠ Ġprintln (- 1 ) ĊĠĠĠ Ġ} Ċ } Ċ