Anna Vic

Me ajudem a resolver os erros por favor algoritmo "Cadastro e Busca de Funcionarios" // Função :Cadastro e Busca de Funcionarios // Autor : // Data : 18/05/2019 // Seção de Declarações var nomes:vetor[0..4] de caractere salarios:vetor[0..4] de real cargos:vetor[0..4] de caractere i,j,s:inteiro procedimento inicializa() inicio enquanto op<>"3" faca escreval ("----------------------------------------") escreval (" menu ") escreval ("----------------------------------------") escreval("(1)Cadastrar funcionário") escreval("(2)Buscar funcionário") escreval("(3)Sair") escreva("Opção:") leia(op) se op="1" entao limpatela se s=10 entao escreval("Esgotou o limite de cadastros") senao cadastra_funcionario() fimse fimse se op="2" entao limpatela buscar_funcionario() fimse se op="3" entao para i de 0 ate 4 faca nomes<-"x" fimpara limpatela escreval("Obrigado!,volte sempre!") fimse fimenquanto fimprocedimento procedimento cadastra_funcionario() inicio para i de 0 ate 4 faca se (nomes[1]="") entao escreva("Nome:") leia(nomes) escreva("Salario:") leia(salario) escreva("Cargo:") leia(cargos) voltar_menu() i<-i+1 limpatela fimse fimpara escreval("Esgotou o limite de cadastros") fimprocedimento procedimento voltar_menu() inicio escreval("Voltar para o menu (S/N)?") leia(op) se op="S" entao i<-i+1 limpatela inicializa() senao limpatela cadastra_funcionario() fimse fimprocedimento procedimento buscar_funcionario() inicio j<-0 escreva("Digite o nome do funcionário:") leia(nome) para i de 0 ate 4 faca se nome=nomes entao escreval("nome:",nomes) escreval("salario:",salarios) escreval"cargo:",cargos) j<-j+1 fimse fimpara se j=0 entao escreval("Funcionario inexistente") fimse voltar_menu2() limpatela fimprocedimento procedimento voltar_menu2() inicio escreva("Voltar para o menu (S/N)?") leia(op) se op="S" entao limpatela inicializa() senao limpatela buscar_funciorario() fimse fimprocedimento inicio inicializa() //Complemente com o código dos exercicio 1 a 3 fimalgoritmo