Prboblemas matematicos

Sea el registo users[n] con los campos

        Entero cb                //Codigo de Barras

        Carácter nu[50]        //Nombre Usuario

        Entero cu                //Cuenta

Inicio

pp←0//Parar programa

Mientras (pp!=1) hacer

        Escribir(“Escribir Bienvenido al cajero de CFE”)

        Escribir(“Seleccione una opción:”)

        Escribir(“Ingresar como:”)

        Escribir(“A)Administrador”)

        Escribir(“B)Usuario”)

        Leer (mpo)        //Menu principal opciones

        Si(mpo) igual que

                ´A´:

                Escribir(“Proporcione contraseña”)

                Leer (password)

                Si(password==”root”) entonces

                        sma←0        //Submenu Administrador

                        Mientras (sma==0) hacer        

                                Escribir(“a)Dar alta de un usuario”)

                                Escribir(“b)Dar baja de un usuario”)

                                Escribir(“c)Cerrar sesión y salir”)

                                Leer (smao)        //Submenu Administrador opciones

                                Si(smao) igual que

                                        ´a´:

                                        aur←0

                                        Mientras (aur==0)hacer        //Repetidor Opcion 1

                                                Escribir(“Altas de Usuarios”)

Escribir(“Ingrese un código de barras”)

band←0        //Bandera para el ciclo siguiente 

Para i←1 hasta n hacer        

                Si(band==0) hacer

                                                                Leer (cb)        //Codigo Nuevo

Si(users[i].cb<=0 && cb!=users[i].cb) hacer

        users[i].cb←cb

                                                                        Escribir(“Ingrese un Nombre”)

                                                                        Leer (users[i].un)        //Nombre de Usuario

                                                                        Escribir(“Ingrese la cuenta”)

                                                                        Leer (users[i].cu)        //Cuenta

                                                                        Escribir(“Usuario Creado”)

                                                                        Escribir(“¿Desea agregar otro usuario?”)

                                                                        Escribir(“0)Si”)

                                                                        Escribir(“1)No”)

                                                                        Leer (aur)

                                                                        Si(aur==1) hacer

                                                                                band←1

                                                                                Escribir(“¿Desea hacer otra acción?”)

                                                                                Escribir(“0)Si”)

                                                                                Escribir(“1)No”)

                                                                                Leer(sma)

                                                                                Si(sma=1) hacer

                                                                                        Escribir(“Cerrando Sesión”)

                                                                                Fin_Si

Fin_si

                                                                Fin_si

                                                        Fin_si

                                                Fin_Para

                                        Fin_Mientras

                                        ´b´:

                                        dur←0 //Repetidor Opcion 2

...