Algoritmos: ejercicio con funciones, juego de ruleta sencilla.

Kalim Al Razif
10 goto 10
Published in
2 min readMay 10, 2018
Inicio
pote = 100
apuesta = 0
nro = -1
resp = 0
resultado = 0

repita mientras resp != 4
resp = menu()
switch(resp)
case1:
apuesta = apuesta(pote)
si apuesta == 0 entonces
break
fin
nro = elegirnro()
resultado = pleno(apuesta,nro)
pote = pote + resultado
si resultado > 0 entonces
imprimir "Ganaste!!!"
sino
imprimir "Mejor suerte para la proxima vez"
fin
break

case2:
apuesta = apuesta(pote)
si apuesta == 0 entonces
break
fin
resultado = parimpar(apuesta,0)
pote = pote + resultado
si resultado > 0 entonces
imprimir "Ganaste!!!"
sino
imprimir "Mejor suerte para la proxima vez"
fin
break
case3:
apuesta = apuesta(pote)
si apuesta == 0 entonces
break
fin
resultado = parimpar(apuesta,1)
pote = pote + resultado
si resultado > 0 entonces
imprimir "Ganaste!!!"
sino
imprimir "Mejor suerte para la proxima vez"
fin
break

case4:
imprimir "Adios!"
break
fin
fin
Fin
funcion menu()
resp = 0
imprimir "1: Apostar a numero"
imprimir "2: Apostar a par"
imprimir "3: Apostar a impar"
imprimir "4: Salir"
leer resp
retornar resp
fin
funcion apuesta(pote)
si pote == 0 entonces
imprimir "No tienes dinero!!!"
retornar 0
fin

apostado = 0

repita
falla = false
imprimir "Haga su apuesta"
leer apostado

si apostado > pote entonces
imprimir "No apuestes lo que no tienes"
falla = true
fin

si apostado < 0 entonces
imprimir "No trampas!!!"
falla = true
fin
mientras falla
retornar apostado
fin
funcion elegirnumero()
quedarse = true
valor = 0
mientras quedarse
imprimir "Elija un numero entre 0 y 36"
leer valor
si valor >= 0 && valor <=36 entonces
quedarse = false
fin
fin
retorna valor
fin
funcion pleno(apuesta,nro)
resultado = 0
nro_ruleta = aleatorio(0,36)

si nro_ruleta == nro entonces
resultado = apuesta * 36
sino
resultado = apuesta * -1
fin
retorna resultado
fin
funcion parimpar(apuesta,modo)
resultado = 0
nro_ruleta = aleatorio(0,36)
si modo == 0 && nro_ruleta mod 2 == 0 entonces
resultado = apuesta * 2
sino si modo == 0 && nro_ruleta mod 2 != 0 entonces
resultado = -1 * apuesta
sino si modo == 1 && nro_ruleta mod 2 != 0 entonces
resultado = apuesta * 2
sino
resultado = -1 * apuesta
fin
retorna resultado
fin

--

--

Kalim Al Razif
10 goto 10

Nací, crecí y aquí sigo. Curioso de nacimiento. Ávido lector. Animeadicto. Cinéfilo o cinefilico XD. SysAdmin por vocación.