Foro de elhacker.net

Hola, soy nuevo en esto y estoy comenzando con un programa básico y sencillo, el problema es que me trabé en un trabajo que me han dejado, vine a pedir ayuda para ver si alguien de aquí podría explicarme como hacerlo o terminarlo, el planteamiento es el siguiente:

****************************************
Considerar que hay un capital inicial y que con cada vez que se juega el capital puede cambiar.

Cuidar que no se pueda jugar si el capital es insuficiente.

Jugar hasta que el usuario indique lo contrario o hasta que se acabe el capital.

Bosquejo del programa esperado

escribir "¿quiere jugar?"

leer resp

escribir "¿cual es tu capital para jugar?"

leer capital

mientras resp=='s' hacer

   escribir "¿cuánto apuestas?"

   jugar_PPT(capital,apuesta)

   escribir "¿quieres jugar otra vez?"

   leer resp

fin-mientras

**************************************************

Se debe realizar en Pseint, gracias de antemano :3

Aquí (http://pseint.sourceforge.net/index.php?page=documentacion.php) tienes la solución.  :rolleyes:

Gracias, lo he hecho ya, me quedó así:

******************************************************

Proceso areas_r
   Repetir
      Escribir "Elige la opcion que deseas calcular"
      Escribir "1) Area de un Circulo"
      Escribir "2) Area de un Cuadrado"
      Escribir "3) Area de un Rectangulo"
      Escribir "4) Area de un Triangulo"
      leer op
      si op = 1 Entonces
         Escribir "Ingrese el radio del circulo"
         leer R
         ra <- R*R;
         area <- ra*3.1416;
         Escribir "El area del circulo es: ", area
      Sino
         si op = 2 Entonces
            Escribir "Ingrese el lado del cuadrado"
            leer la
            area <- la*la;
            Escribir "El area del cuadrado es: ", area
         Sino
            si op = 3 Entonces
               Escribir "Ingrese la base"
               leer b
               Escribir "Ingrese la altura"
               leer h
               ar<- b*h
               Escribir "El area del rectangulo es: ", ar
            Sino
               si op = 4 Entonces
                  Escribir "Ingrese la base"
                  leer base
                  Escribir "Ingrese la altura"
                  leer altura
                  areaa <- base*altura/2
                  Escribir "El area del triangulo es: ", areaa
               Sino
                  Escribir "Error"
               FinSi
            FinSi
         FinSi
      FinSi
      Escribir "Desea continuar? (si/no)"
      leer respuesta
   Hasta Que respuesta = "no"
   
FinProceso

******************************************

Ahora, me dicen que debe hacerse con Subproceso y eso me ha dejado mas sacado de onda, alguna ayuda en eso??

Sí  ;D

http://pseint.sourceforge.net/index.php?page=ejemplos.php&cual=Subprocesos&mode=flexible