Question

Desenvolver um programa de agenda que cadastre o nome, endereço, cep de 4 pessoas e seguida liste-os.

Answer 1

algoritmo "cadastro"// Função : cadastrar 3 clientes  e listar// Autor : Cleverson Ferreira// Data : 1/12/2014// Seção de Declarações varnome: vetor [1..3] de caractereendereco: vetor [1..3] de caracterecep: vetor [1..3] de inteiroi,contador: inteiro
inicio
contador <- 0// Seção de Comandos escreval("===== CADASTRO DE CLIENTES =====")escreval("Clientes Cadastrados: ", contador)escreval()para i <- 1 ate 3 facaEscreval("Nome")leia (nome[i])Escreval("Endereço")leia (endereco[i])Escreval("CEP")leia (cep[i])contador <- contador + 1limpatelaescreval("===== CADASTRO DE USUARIOS =====")escreval("Clientes Cadastrados: ", contador)escreval()
fimpara
para i de 1 ate 3 faca     escreval ("Nome: ", nome[i])     escreval ("Endereço: ", endereco[i])     escreval ("CEP: ", cep[i])fimpara
fimalgoritmo

ta ai cara, aqui ele n pega a formatação, mas joga no visualg e arruma lá.
Ta funcionando certinho