promedio_varianza.np

var {
    n: real,
    aux: real,
    prom: real,
    array1: array[100],
    i: real
}
body {

    write("Calcula el promedio y la varianza de los elementos de una lista");

    read("ingrese tamaño de la lista: ", n);

    for i from 0 to n {
        read("ingresa un numero: ", aux);
        array1[i] = aux;
    };

    aux = 0;
    for i from 0 to n {
        aux = aux + array1[i];
    };

    prom = aux / n;

    aux = 0;
    for i from 0 to n {
        aux = aux + pow(array1[i] - prom, 2);
    };

    varianza = root(aux/n, 2);

    write("el promedio es de ", prom);
    write("la varianza es de ", varianza);
}