Foros aprenderaprogramar.com
Didáctica y divulgación de la programación

Saludos a todos los miembros de aprenderaprogramar. Estoy siguiendo el curso de "Bases o fundamentos de la programación online" de esta web.

Acabo de registrarme, y estoy siguiendo los cursos básicos, y mucho les agradecería su ayuda.

Me atasqué en el ejemplo de Parámetros por valor y por referencia, usando pseudocódigo (CU00208A).

Cuando escribo el código en PSeInt, el módulo no reconoce la variable del parámetro como global, o el algoritmo principal no recoge el valor elaborado dentro del módulo.

Aquí dejo el código.

*** *** ***

Funcion EntraDatos
   Repetir
      Mostrar "Por favor, introduzca número entero entre 0 y 100"
      Leer Dato
      Dato=redon(Dato)
   Mientras Que Dato<0 O Dato>100
Fin Funcion

Funcion Proces(num)
   Raiz01 = rc(num)
   Raiz02 = -Raiz01
   Suce=0
   Mientras num>=0 Hacer
      Suce=Suce+rc(num)
      num=num-1
   Fin Mientras
Fin Funcion

Funcion Resultados
   Mostrar "Dato base = ", Dato
   Mostrar "Raiz01 = ", Raiz01
   Mostrar "Raiz02 = ", Raiz02
   Mostrar "Valor de la suma de los términos de la sucesión = ", Suce
Fin Funcion

Algoritmo PROGRAMA_SUC02
   Definir E Como Entero
   Definir Dato, Raiz01, Raiz02, Suce Como Real
   Mientras E<>2 Hacer
      Mostrar "Elija  1.Cálculo 2. Salir"
      Leer E
      Si E=1 Entonces
         EntraDatos
         Proces(Dato)
         Resultados
      Fin Si
   Fin Mientras
FinAlgoritmo