package Ġcom . nc ort i . a oc 2 0 2 1 Ċ Ċ object ĠExercise 0 1 Ġ{ ĊĊĠĠĠ Ġfun Ġpart 1 (): ĠInt Ġ= ĊĠĠĠĠĠĠĠ Ġget Input As Test (" 0 1 ") Ġ{ Ġsplit ("\ n ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. map ( String :: toInt ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. zip With Next Ġ{ Ġl , Ġr Ġ-> Ġl Ġ- Ġr Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. count Ġ{ Ġit Ġ< Ġ 0 Ġ} ĊĊĠĠĠ Ġfun Ġpart 2 (): ĠInt Ġ= ĊĠĠĠĠĠĠĠ Ġget Input As Test (" 0 1 ") Ġ{ Ġsplit ("\ n ") Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. map ( String :: toInt ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. window ed ( 3 ) Ġ{ Ġit . sum () Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. zip With Next Ġ{ Ġl , Ġr Ġ-> Ġl Ġ- Ġr Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ. count Ġ{ Ġit Ġ< Ġ 0 Ġ} Ċ } Ċ Ċ fun Ġmain () Ġ{ ĊĠĠĠ Ġprintln ( Exercise 0 1 . part 1 ()) ĊĠĠĠ Ġprintln ( Exercise 0 1 . part 2 ()) Ċ } Ċ