Hola muy buenas, si me podían ayudar con esta tarea me pide programar este ejercicio a Pseint
Gracias por su tiempo.
Respuestas
Funcion x <- combinacion ( n, k )
definir i, x, productoK, productoN como entero;
i <- 1;
productoK <- 1;
productoN <- 1;
si k = 0 entonces
x <- 1;
FinSi
si n < k entonces
escribir sin saltar " ¡¡¡ERROR!!!";
Escribir sin saltar n;
Escribir sin saltar " debe ser mayor o igual a ";
Escribir k;
FinSi
si n < 0 o k < 0 Entonces
Escribir "¡¡¡ERROR!!! Los numeros ingresados deben ser enteros no negativos";
FinSi
Mientras i<=k Hacer
productoK <- productoK * i;
productoN <- productoN * (n-i+1);
i<- i+1;
FinMientras
x <- productoN / productoK;
FinFuncion
Proceso Combinaciones
definir n como entero;
definir r como entero;
Escribir "Este programa calcula el numero de combinaciones sin repeticion dado n y r: C(n.k)";
Escribir sin saltar "coloque el valor de n = ";
Leer n;
Escribir sin saltar "Coloque el valor de r = ";
Leer r;
Escribir "Resultado ";
Escribir sin saltar "C(";
Escribir sin saltar n;
Escribir sin saltar ",";
Escribir sin saltar r;
Escribir sin saltar ") = ";
Escribir combinacion(n,r);
FinProceso