• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Imprima y sume la serie 3, 6, 7, 10, 11, 14, 15, 18 hasta N

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Proceso Serie3671011141518
    suma <- 0;
    Escribir Sin Saltar "Ingresa el valor de n:";
    Leer n;
    Para i<-1 Hasta n Con Paso 1 Hacer
        Escribir "PROCESO ", i;
        Si i = 1 O i MOD 2 = 0 Entonces
            termino <- termino+3;
        SiNo
            termino <- termino+1;
        FinSi
        suma <- suma+termino;
        Escribir "Valor de termino: ", termino;
        Escribir "";
    FinPara
    Escribir "Valor de suma: ", suma;
FinProceso