Algortimos de Series

PRIMERA SERIE: 

                     3    5     8    12    14    23 ...

                    1°   2°   3°    4°    5°    6°...

 

 
Proceso
escribir "ESCRIBA EL NUMERO DEL TERMINO QUE DESEA"
leer N
A <- 3
I <- 1
MIENTRAS (I<=n) Hacer
        ESCRIBIR A
        A <- A + I + 1
        I <- I +1
FIN Mientras
 
FinProceso
 
 
 
SEGUNDA SERIE:
 
                    8     3      9     36    180...
                    1°    2°    3°    4°       5°...
 
Proceso sin_titulo
escribir "ESCRIBA EL NUMERO DEL TERMINO QUE DESEA"
leer N
I <- 1
A <- 8
B <- 3
MIENTRAS (I<=n) Hacer
        SI (I=1) Entonces
            ESCRIBIR A
            I <- I + 1
        SINO 
            ESCRIBIR B
            B <- B *(I + 1)
            I <- I + 1
        FinSi
FinMientras
 
FinProceso
 
 
 
TERCERA SERIE:
 
                        2     5     4     10     16     20...
                        1°    2°   3°    4°    5°      6°...
 
Proceso sin_titulo
escribir "ESCRIBA EL NUMERO DEL TERMINO QUE DESEA"
leer N
I <- 1
A <- 2
B <- 5
SW <- 1
    MIENTRAS (I<=n) Hacer
                SI (SW=1) Entonces
                    ESCRIBIR A
                    A <- A * A
                    SW <- 0
                SINO 
                    ESCRIBIR B
                    B <- B *2
                       SW <- 1
                FinSi
                I <- I + 1
    FinMientras
 
FinProceso
 
 
 
CUARTA SERIE:
 
 
                            8     -2     10    -8    100    -48    1000
                            1°     2°    3°    4°      5°       6°      7°
 
 
 
Proceso sin_titulo
escribir "ESCRIBA EL NUMERO DEL TERMINO QUE DESEA"
leer N
I <- 1
A <- 8
B <- -2
C <- 10
SW <- 1
        MIENTRAS (I<=N) Hacer
                SI (I=1) Entonces
                        ESCRIBIR A
                SINO 
                        SI (SW=1) Entonces
                                ESCRIBIR B
                                B <- B * ( I + 2)
                                SW <- 0
                        Sino
                                ESCRIBIR C
                                C <- C * 10
                                SW <- 1
                        FinSi
                FinSi
                        I <- I + 1
          FinMientras
FinProceso
 
 
 
 
 
 
 
 
 
 
 

 

 

 

© 2011 Todos los derechos reservados.

Crea una web gratisWebnode