Foro - Perl en Español

por **osner** » 2011-07-22 07:06 @337

1- Haga una función en C++ que retorne la suma de los números primos que existen en un arreglo de 10 elementos enviados como parámetro en dicha función.

2- Hacer una función en c++que permita calcular la suma, la media, la mediana, la moda el mayor y el menor. En la función se envía los 10 valores enteros en un array leído desde el teclado.

Bienvenido a los foros de Perl en español, osner.

Este foro está dedicado al lenguaje Perl, y tampoco solemos hacer los ejercicios de clase, así que aquí no encontrarás solución. Mejor si preguntas en otros foros que sí se dediquen a alguna de esas dos tareas.

De todas maneras, aquí está la solución (en Perl, claro)

1.

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

sub suma_primos {
    my @numeros = @_;
 
    use Math::Prime::XS 'is_prime';
 
    my $suma = 0;
 
    for my $numero (@numeros) {
        if (is_prime($numero)) {
            $suma += $numero;
        }
    }
 
    return $suma;
}
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

2.

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

sub calcular {
    my @valores = @_;
 
    use Statistics::Basic qw(:all);
    use List::Util qw(max min sum);
 
    my $vector = vector(@valores);
 
    print "Suma:    ", sum   (@valores);
    print "Media:   ", mean  ($vector);
    print "Mediana: ", median($vector);
    print "Moda:    ", mode  ($vector);  # <= problemas si es de más de un valor
    print "Mayor:   ", max   (@valores);
    print "Menor:   ", min   (@valores);
}
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

por **pvaldes** » 2011-07-23 14:13 @634

Pues mira, ese segundo en concreto me lo voy a agenciar, copiar y fusilar vilmente y sin ningún tipo de complejo :mrgreen:

descargando...

# <= problemas si es de más de un valor

me pica la curiosidad

¿por qué?

(ah, imagino que te refieres a que haya dos modas con exactamente el mismo número de elementos ¿voy bien encaminado?)

por **pvaldes** » 2011-07-23 18:01 @792

ah... la línea 10 del segundo script tiene un pequeño error tipográfico, debería ser así

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

print "Media:   ", mean  ($vector);
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Saludetes

por **explorer** » 2011-07-23 18:27 @810

Efectivamente, puede haber más de un elemento que sea moda. Por eso, la función podría devolver una lista de elementos, en lugar de uno solo. Habría que expandir el código para contemplar esa posibilidad.

El fallo tipográfico ya está corregido. Gracias.

Foro - Perl en Español

Cómo puedo hacer los siguientes ejercicios en C++

Cómo puedo hacer los siguientes ejercicios en C++

Publicidad

Re: Ejercicios en C++

Re: Cómo puedo hacer los siguientes ejercicios en C++

Re: Cómo puedo hacer los siguientes ejercicios en C++

Re: Cómo puedo hacer los siguientes ejercicios en C++

¿Quién está conectado?