Comparto una variante que pensé por mi cuenta y que es fácil de entender Algoritmo Factorial_N_variante //variante del codigo anterior definir num1 como real; definir factorial como real; escribir "Ingrese un numero mayor o igual a 0 para obtener su factorial"; leer num1; factorial
Puedes meter todo el procedimiento en un subproceso con el numero como parametro y luego mandas a llamar 3 veces al mismo subproceso pero con diferente variable
mmmmmm te complicaste mucho ..... ve este: Definir fact como real definir num como real definir X como entero Escribir "ingrese un numero" leer num fact = 1 si num >= 0 entonces para X=1 hasta num con paso 1 hacer fact= fact*X finpara escribir "el numero factorial es: ", fact sino escribir "no es factorial " finsi