Como implementar uma agenda telefônica com matriz no VisualG?

[DE JR]

Preciso de ajuda urgente para formular um código no visualG.

Faça um programa que implemente uma agenda telefônica, onde uma matriz denominada cliente armazenará 30 clientes (linhas). Para cada cliente devem ser exibidas as opções: (1) armazenar cliente (informar linha); (2) listar todos; (3) consultar um cliente (informar linha); (4) remover cliente (informar linha). 

Qualquer ajuda é bem vinda. Agradeço desde já.

[SimonViegas]

Tópico antigo... segue fluxo de uma base de como poderia implementar:

Imaginei que teria dois parâmetro: nome e telefone. Daí, uma matriz com duas coordenadas.

Esboço inicial:

algoritmo "Vetores - Agenda telefônica"
//Faça um programa que implemente uma agenda telefônica, onde uma matriz
//denominada cliente armazenará 30 clientes (linhas). Para cada cliente devem
//ser exibidas as opções:
//(1) armazenar cliente (informar linha);
//(2) listar todos;
//(3) consultar um cliente (informar linha);
//(4) Remover cliente (informar linha).
const
   //TAM_VET = 30
   TAM_VET = 3
var
   clientes : vetor [1..TAM_VET, 1..2] de caractere

inicio
clientes[1,1] <- "DE JR"
clientes[1,2] <- "71 9234-5678"

escrevaL("Nome    : ", clientes[1,1])
escrevaL("Telefone: ", clientes[1,2])
fimAlgoritmo

 

 

Já joga o menu... (que é meio que genérico):

algoritmo "Vetores - Agenda telefônica"
//Faça um programa que implemente uma agenda telefônica, onde uma matriz
//denominada cliente armazenará 30 clientes (linhas). Para cada cliente devem
//ser exibidas as opções:
//(1) armazenar cliente (informar linha);
//(2) listar todos;
//(3) consultar um cliente (informar linha);
//(4) Remover cliente (informar linha).
const
   //TAM_VET = 30
   TAM_VET = 3
var
   clientes : vetor [1..TAM_VET, 1..2] de caractere
   opcao : caractere
inicio
   clientes[1,1] <- "DE JR"
   clientes[1,2] <- "71 9234-5678"

   repita
      escrevaL("")
      escrevaL("(1) Armazenar cliente")
      escrevaL("(2) Listar todos")
      escrevaL("(3) Consultar um cliente")
      escrevaL("(4) Remover cliente")
      escreva ("=> ")
      leia(opcao)

      escolha opcao
      caso "1"

      caso "2"
         escrevaL("Nome    : ", clientes[1,1])
         escrevaL("Telefone: ", clientes[1,2])
      caso "3"

      caso "4"
      fimEscolha
   ate (opcao = "0")

fimAlgoritmo

 

Daí só montando as lógicas e ajustando detalhes...