Scribd Logo
Cargar

¡Te damos la bienvenida a Scribd!

  • 8 vistas

    Proceso Banco

    Cargado por

    Manuel Alberto Velasco Muñoz
    Ejercicio de procesos de un programa en C++ de la materia de programacion

    Copyright:

    © All Rights Reserved
    Descargue como DOCX, PDF, TXT o lea en línea desde Scribd

    Proceso Banco

    Cargado por

    Manuel Alberto Velasco Muñoz
    8 vistas6 páginas
    Ejercicio de procesos de un programa en C++ de la materia de programacion

    Título original

    Proceso banco

    Derechos de autor

    © © All Rights Reserved

    Formatos disponibles

    DOCX, PDF, TXT o lea en línea desde Scribd

    ¿Le pareció útil este documento?

    ¿Este contenido es inapropiado?

    Ejercicio de procesos de un programa en C++ de la materia de programacion

    Copyright:

    © All Rights Reserved
    Descargue como DOCX, PDF, TXT o lea en línea desde Scribd
    Descargar como docx, pdf o txt
    8 vistas6 páginas

    Proceso Banco

    Cargado por

    Manuel Alberto Velasco Muñoz
    Ejercicio de procesos de un programa en C++ de la materia de programacion

    Copyright:

    © All Rights Reserved
    Descargue como DOCX, PDF, TXT o lea en línea desde Scribd
    Descargar como docx, pdf o txt
    Está en la página 1de 6

    Proceso banco_fi

    numclientes = 5

    Dimension nombres[numclientes];

    Dimension cuenta[numclientes];

    Dimension saldo[numclientes];

    dimension r[1];

    dimension d[1];

    dimension tr[1]

    dimension td[1]

    dimension comisiones[1]

    j = 0;

    Hacer

    Escribir "Menú";

    Escribir "1. Leer saldos iniciales";

    Escribir "2. Mostrar lista de clientes y saldos";

    Escribir "3. Operaciones";

    Escribir "4. Informe de operaciones";

    Escribir "5. Salir";

    Leer n;

    Segun n hacer

    1:

    si j = 0 Entonces

    guardarDatos(nombres, cuenta, saldo);

    Escribir "Los datos han sido leidos con exito";

    sino

    Escribir "La lista de saldo ya ha sido leida"


    FinSi

    j = j+1;

    2:

    si j = 0 entonces

    Escribir "Primero se tiene que leer los saldos iniciales (1)"

    sino

    Escribir "Lista de clientes"

    para x<-0 hasta numclientes-1 con paso 1 Hacer

    Escribir "Nombre: ", nombres[x];

    Escribir "Cuenta: ", cuenta[x];

    Escribir "Saldo: ", saldo[x];

    Escribir " ";

    FinPara

    finsi

    3:

    si j = 0 entonces

    Escribir "Primero se tiene que leer los saldos iniciales (1)"

    sino

    operaciones(nombres, cuenta, saldo, numclientes, r, tr, d, td,


    comisiones);

    FinSi

    4:

    si j = 0 Entonces

    Escribir "Primero se tiene que leer los saldos iniciales (1)"

    SiNo

    Escribir "Numero de retiros: ", r[0];

    Escribir "Monto total de retiros: ", tr[0];

    Escribir "Numero de depositos: ", d[0];

    Escribir "Monto total de depositos: ", td[0];


    Escribir "Monto de comisiones cobradas: ", comisiones[0];

    FinSi

    FinSegun

    Hasta que n = 5

    FinProceso

    subproceso guardarDatos(nombres, cuenta, saldo)

    nombres[0] <- "Manuel Alberto Velasco Munoz";

    cuenta[0] <- 4173810032;

    saldo[0] <- 2000;

    nombres[1] <- "Ana Valeria Rivera";

    cuenta[1] <- 9119611044;

    saldo[1] <- 3928

    nombres[2] <- "Juan Tellez Perez";

    cuenta[2] <- 4207812030;

    saldo[2] <- 110

    nombres[3] <- "Luis Garza Costa";

    cuenta[3] <- 6374900152;

    saldo[3] <- 1000

    nombres[4] <- "Gabriel Suarez Hernandez";

    cuenta[4] <- 4794727437;

    saldo[4] <- 50
    FinSubProceso

    subproceso operaciones(nombres, cuenta, saldo, numclientes, r, tr, d, td, comisiones)

    x<-1;

    Hacer

    Escribir "Lista de clientes";

    para cont<-0 hasta numclientes-1 con paso 1 Hacer

    Escribir "Cliente", cont+1

    Escribir "Nombre: ", nombres[cont];

    Escribir "Cuentas: ",cuenta[cont];

    Escribir "Saldo: ", saldo[cont];

    Escribir " ";

    FinPara

    Escribir "Selecciona al cliente";

    leer cl;

    Escribir "Has seleccionado al cliente: ", cl;

    Escribir "Que tipo de movimiento quieres hacer?";

    Escribir "(1)depósito o (2)retiro"

    Leer op;

    segun op hacer

    1:

    calculoDeposito(nombres, cuenta, saldo, cl, d, td);

    2:

    calculoRetiro(nombres, cuenta, saldo, cl, r, tr, comisiones);

    FinSegun

    Escribir "Quieres hacer realizar otra operacion (1)Si (2)No?"


    Leer x;

    Hasta Que x <> 1

    FinSubProceso

    subproceso calculoDeposito(nombres, cuenta, saldo, cl, d, td)

    Escribir "Escribe el monto a depositar"

    leer deposito;

    d[0] = d[0] + 1;

    td[0] = td[0] + deposito;

    saldo[cl-1] = saldo[cl-1] + deposito;

    FinSubProceso

    subproceso calculoRetiro(nombres, cuenta, saldo, cl, r, tr, comisiones)

    Escribir "Escribe el monto a retirar"

    Leer retiro;

    r[0] = r[0] + 1;

    si retiro > saldo[cl-1] Entonces

    Escribir "No tienes los fondos suficientes"

    sino

    saldo[cl-1] = saldo[cl-1] - retiro;

    tr[0] = tr[0] + retiro;

    com = retiro;

    retiro = (retiro * 0.97);

    com = com - retiro;


    saldo[cl-1] = saldo[cl-1] - com;

    comisiones[0] = comisiones[0] + com;

    FinSi

    FinSubProceso

    También podría gustarte