Ciencia da Computação
Declare
op: inteiro; Inicio escreva "O que deseja fazer: "; escreva "(1) Cadastrar nova conta."; escreva "(2) Visualizar contas por cliente."; escreva "(3) Excluir conta com menor saldo."; escreva "(4) Sair."; leia op; escolha (op) { op1: cadastro(); op2: visualizar(); op3: exluir(); op4: sair(); }
Fim
Sub-rotina cadastro() Declare cadastro: Registro; nome: literal; numero: inteiro; saldo: real; fim-resgistro; i=1,j,op2: inteiro; Inicio faça { escreva "Entre com o nome do cliente: "; leia cadastro[i].nome; escreva "Entre com o numero da conta: "; leia cadastro[i].numero; escreva "Entre com o saldo da conta: "; leia cadastro[i].saldo; escreva "Deseja efetuar um novo cadastro: (1)Sim (2)Não "; leia op2; se op2 == 1 então i = i + 1; senão i = 16; } enquanto ( i < 16); Fim-sub-rotina;
Sub-rotina visualizar() Declare nome: literal; i: inteiro; Inicio escreva "Digite o nome do cliente: "; leia nome; para i = 0 até i < 15 faça { se nome == cadastro.nome[i] então escreva "As contas do cliente ",nome," são: ",cadastro.nome[i]; } Fim-sub-rotina;
Sub-rotina excluir() Declarar menor: real; i: inteiro
menor = cadastro[0].saldo; para i =0 até i < 15 faça { se menor > cadastro[i].saldo então menor = cadastro[i].saldo; } para i =0 até i < 15 faça { se menor == cadastro[i].saldo então { cadastro[i].saldo = 0; cadastro[i].nome = '';