Visual G - Vetor

[legolas3d]

Olá caros amigos do clube, um amigo meu chegou com um problema para mim, porém não manjo de Visual G. Vou postar até onde ele fez e gostaria da ajuda de vocês para ajuda-lo.

Criar um vetor que tenha as seguintes funcionalidades: inserir, consultar, excluir, editar, emprestimo. O vetor tem que ser capaz de armazenar 10 nomes de livros.

Os problemas que meu amigo encontrou é que o programa não exclui nem edita.

var
vet:vetor [1..10] de caracter
vetx:vetor [1..10] de inteiro
i,op,li:inteiro
procedimento preencher
inicio
para i:=1 ate 10 faca
escreval("Inserir Livros",i)
leia (vet)
fimpara
fimprocedimento
procedimento editar
inicio
escreval("Inserir Nº do Livro p/Editar")
leia (li)
para i:=1 ate 10 faca
se vet =li então
leia(vet)
fimse
fimpara
fimprocedimento

procedimento excluir
inicio
escreval("Digite o Nº do livro p/excluir")
leia(li)
para i:=1 ate 10 faca
se (vet=li)então
vet=" "
fimse
fimpara
fimprocedimento

procedimento livros
inicio
para i:=1 ate 10 faca
escreval("vet, vetx)
fimpara
fimprocedimento

procedimento emprestimo
inicio
escreval("Inserir Nº do livro desejado")
leia(li)
para i:=1 ate 10 faca
se (vet = li) então
vet:=1
fimse
fimpara
fim procedimento

inicio
repita
escreval
escreval("tela")
escreval
escreval("[1] Enserir Livro")
escreval("[2] Excluir Livro")
escreval("[3] Editar Livros")
escreval("[4] Lista de Livros")
escreval("[5] Emprestimo")
escreval("[6] Sair")
escreval
escreval("O que deseja fazer?")
leia (op)
escolha op
caso 1
preencher
caso 2
excluir
caso 3
ediatar
caso 4
livros
caso 5
emprestimo
fimescolha
ate (op=6)
fimalgoritmo

[Sandro Fortes]

Ola, bah fui eu q mandei esse problema...vou enviar o enunciado...esse problema tem que rodar e tem que ter uma tela bonita....assim quer minha professora...!!

Esse é o enunciado:

Elaborar um algoritmo que manipula um vetor de 10 posições para armazenar nome de livros. A inserção de livros deve ser efetuada um livro por vez.

Regras:

1..Deverá ter tela inicial

2..Deverá ser permitido inserir livros, consultar livros, emprestar livros, exluir livros e editar livros.

3..Devera ser empresa a mensagem quando o vetor estiver repleto de livros não sendo permitido a inserçao de novos livros.

4..Sempre devera ser apresentada mensagem informando o procedimento adotado pelo usuario do sistema.