Clase 6 Ejemplo 6.2.3

/*calcular que color de bolitas es
el que tiene mayor cantidad en la celda actual*/

function colorMasBolitas() {
// Ponemos Azul como valor inicial
colorMas := Azul
// Y buscamos ver si los otros colores
// tienen mas bolitas que el color Azul
repeatWith c in Negro..Verde { // [Negro, Rojo, Verde]
if (nroBolitas(c) > nroBolitas(colorMas)) {
colorMas := c
}
}
return(colorMas)
}

procedure Main(){
valor:= colorMasBolitas()
return (valor)
}