Estuve haciendo un programa en SLE2 que dice lo siguiente: Escribir un programa que determine la cantidad de combinaciones que se pueden realizar tomando k elementos distintos de un grupo de n elementos. El numero de combinaciones esta dado por la siguiente formula: Donde m! factorial representa el factorial de m
Yo hice el código utilizando subrutinas, pero no me está dando los valores que deseo. Ya que, en la subrutina tengo un ciclo iterativo que me aumenta el valor de forma automática para obtener los factoriales, hacer la operación y saber las combinaciones...
Cuando ejecuto el código no me hace el factorial de los valores que ingreso. Si ingreso 4 debería sacar el factorial de ese número y no lo hace. Necesito ayuda para este problema, por favor.
var
n, k, comb : numerico
inicio
cls()
n = 0
k = 0
comb = 0
imprimir ("Ingrese el valor de n: ")
leer(n)
imprimir ("Ingrese el valor de k: ")
leer(k)
comb = fact(n)/(fact(k)*fact(n-k))
imprimir ("Cantidad de combinaciones: ", comb)
fin
subrutina fact(n : numerico) retorna numerico
var
factorial : numerico
inicio
factorial = 1
repetir
factorial = factorial * n
hasta (n > 0)
retorna(factorial)
fin