Clase 4 Ejercicio 3.2.17

function verificaCantidadBolitas()
{
return( nroBolitas(Azul)+nroBolitas(Rojo)+nroBolitas(Negro)+nroBolitas(Verde))
}

procedure PonerN(cant){
repeatWith i in 1..cant
{Poner(Negro) }
}

procedure DibujarSombra(intensidad){
Mover(Este)
PonerN(intensidad)
}

procedure Main(){

DibujarSombra(verificaCantidadBolitas())
}