Ciclos en PASCAL

Tema en 'Programación' comenzado por misius, 19/4/08.

Estado del tema:
No está abierto para más respuestas.
  1. misius

    misius Nuevo Miembro Miembro

    Hola. Pasaba a pedir un poco de ayuda ya que estaba realizando mi segundo programa en Pascal y creo que necesito aplicar un ciclo for ó while y ando liado con esto, el asunto es que necesito crear un programa donde el usuario coloque un numero N y después suministre los numeros a ser analizados y así obtener el promedio de estos.

    Si me pidieran realizar un programa donde me dijeran la cantidad de numeros a ser promediados seria facil, pero cuando es el usuario quien elige la cantidad de numeros a ser promediados ahi es donde me confundo, supongo que es algo de los ciclos pero aun no se usarlos del todo. Gracias por la ayuda que me puedan dar.



    Saludos
     
  2. rob1104

    rob1104 Super Moderador Super Moderador

    Es mas fácil de lo que parece, y pues cuando dejas que el usuario establezca la cantidad de veces que se va a repetir el ciclo es recomendable usar el ciclo for (aunque con while también va y es mas facil), en pseudocodigo con while seria mas o menos asi

    Código:
    Declarar variables
    
       N: entero (almacenar numero)
    
       X: entero (contador)
    
       num: entero o real(numeros a ser analizados)
    
       suma: entero o real (suma de calificaciones)
    
       promedio: entero o real
    
    Pedir numero de veces que se va a repetir
    
    Leer numero (almacenamos el numero en una variable N)
    
    X=0
    
    mientras X sea menor que N
    
       pedir numero a ser analizado
    
       leer el numero (almacenamos en la variable num)
    
       suma=suma + num  (se va sumando)
    
    fin de mientras
    
    promedio=suma/N (se saca el promedio)
    
    mostrar promedio.   
    Cualquier duda pregunta...
     
  3. misius

    misius Nuevo Miembro Miembro

    Gracias por responder, lo que pasa es que mi primer programa fue hacer el promedio de 2 numeros, ok ese fue muy facil, pero el segundo es hacer que ahora no sean dos ni tres sino la cantidad N que pida el usuario, tendria que ser el primer programa que hice pero colocandole ciclos, el problema es que he intentado pero no logro aun modificarlo, supongo que no se como usar los famosos ciclos.

    Código:
    program Promedio_de_dos_numeros;
    
    uses
    
      crt;
    
    var
    
      a:real;
    
      b,c:real;
    
    begin
    
    clrscr();
    
     writeln('Escriba el primer numero: '  );
    
     readln(a);
    
     write();
    
     writeln('Escriba el segundo numero: '  );
    
      readln(b);
    
    writeln('Este es el promedio');
    
    c:=(a+b)/2;
    
      Write(c);
    
      readln();
    
    end.
    Asi fue el primero, pero ahora que se supondria que debo modificar?
     
  4. rob1104

    rob1104 Super Moderador Super Moderador

    Sigue el algoritmo que te di, donde te atores vas preguntando, así iras aprendiendo mas facil
     
Estado del tema:
No está abierto para más respuestas.

Comparte esta página