Clase 3 Ejercicio 3.1.2-2

/*Escribir los procedimientos que se describen.
1. PonerN que deposite cant bolitas de color color en la celda actual, suponiendo que cant es un numero positivo. ¿Cual es su precondicion?
2. MoverN que se mueva cant celdas en la direccion dir desde la celda actual,
suponiendo que cant es un numero positivo. ¿Cual es su precondicion?*/

procedure PrepararTablero(){
VaciarTablero()
IrAlOrigen()
}
/*Empieza 1*/
procedure PonerN(cant, color)
{
repeatWith i in 1..cant
{ Poner(color) }
}
/*Empieza 2*/
procedure MoverN(cant, dir){
repeatWith i in 1..cant
{ Mover(dir) }
}
/*Empieza Main*/
procedure Main(){
PrepararTablero()
PonerN(17, Azul)
MoverN(3,Norte)
}