import Ġkotlin . random . Random Ċ Ċ fun Ġmain () Ġ{ Ċ ĉ /* Ċ ĉ * ĠE scre va Ġum Ġprograma Ġque Ġle ia / g ere Ġum Ġvet or Ġv G ab Ġde Ċ ĉ * ĠĠ 1 0 Ġelementos Ġdo Ġtipo Ġcar act ere Ġque Ġrepresent a Ġo Ċ ĉ * Ġg ab ar ito Ġde Ġuma Ġpro va . ĠO Ġvet or ĠsÃ³ Ġace ita Ġos Ġcaracteres Ċ ĉ * Ġ Ġ' A ', Ġ' B ', Ġ' C ', Ġ' D ' Ġe Ġ' E ' Ġmai Ãº sc ulas . ĠA Ġseguir , Ġpara Ċ ĉ * Ġ Ġcada Ġum Ġdos Ġ 2 0 Ġal un os Ġda Ġtur ma , Ġle ia Ġo Ġvet or Ġv Resp Ċ ĉ * Ġcom Ġas Ġ 1 0 Ġresp ost as Ġdo Ġal uno Ġe Ġcont e Ġo ĠnÃºmero Ġde Ġac er tos . Ċ ĉ * ĠMost re Ġa Ġquant idade Ġde Ġac er tos Ġdo Ġal uno Ġe Ġuma Ġmens agem Ċ ĉ * ĠâĢľ AP RO V ADO âĢĿ, Ġse Ġa Ġnota Ġfor Ġmai or Ġou Ġig ual Ġa Ġ 7 . 0 ; Ġe Ċ ĉ * Ġmost re Ġuma Ġmens agem Ġde ĠâĢľ RE PROV ADO âĢĿ, Ġcaso Ġcontr Ã¡rio . Ġ*/ ĊĊ ĉ val Ġtest Result Ġ= Ġmutable ListOf < Char >() Ċ ĉ val Ġtest Resp Ġ= Ġmutable ListOf < Char >() ĊĊ ĉ generate ( test Result ) Ċ ĉ for Ġ( i Ġin Ġ 0 Ġuntil Ġ 2 0 ) Ġ{ Ċĉ ĉ generate ( test Resp ) Ċĉ ĉ println ( test Result . toString ()) Ċĉ ĉ println ( test Resp . toString ()) ĊĊĉ ĉ val Ġgrade Ġ= Ġverify Answers ( test Result , Ġtest Resp ) ĊĊĉ ĉ print (" Student Ġ${ i + 1 } Ġ- Ġ$ grade ") Ċĉ ĉ if Ġ( grade Ġ>= Ġ 7 ) Ċĉĉ ĉ println (" Ġpassed Ġthe Ġtest Ġ:) ") Ċĉ ĉ else Ċĉĉ ĉ println (" Ġfailed Ġthe Ġtest Ġ: (" ) Ċ ĉ } Ċ } Ċ Ċ fun Ġgenerate ( list : ĠMutable List < Char >) Ġ{ Ċ ĉ list . clear () Ċ ĉ for Ġ( i Ġin Ġ 0 Ġuntil Ġ 1 0 ) Ċĉ ĉ list . add (( Random . nextInt ( 6 5 , 7 0 ). to Char ())) Ċ } Ċ Ċ fun Ġverify Answers ( test Result : ĠMutable List < Char >, Ġtest Resp : ĠMutable List < Char >): ĠInt Ġ{ Ċ ĉ var Ġpoints Ġ= Ġ 0 Ċ ĉ for Ġ( i Ġin Ġ 0 Ġuntil Ġtest Result . size ) Ġ{ Ċĉ ĉ if Ġ( test Result [ i ] Ġ== Ġtest Resp [ i ]) Ċĉĉ ĉ points ++ Ċ ĉ } Ċ ĉ return Ġpoints Ċ }