Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 1 . Localizar os livros de um determinado autor e listar o título de cada um.
- caracter : nome_obra, nome_autor, editora;
- inteiro : ano_pub, edicao, con_pag, cont;
- inicio
- escreva “Digite o nome do autor: ”;
- leia nome_autor;
- cont = 1
- enquanto cont <= 5000 faca
- escreva “Título do(s) livro(s) do autor ”,nome_autor, “ é: “,nome_obra;
- cont = cont + 1;
- fimenquanto
- fim
- 2 . Localizar um determinado título e exibir as informações da obra.
- caracter : nome_obra, nome_autor, editora;
- inteiro : ano_pub, edicao, con_pags, cont;
- inicio
- escreva “Digite o título do livro: ”;
- leia nome_obra;
- cont = 1
- enquanto cont <= 50000 faca
- se nome_obra = nome_obra
- escreva “O título buscado foi: ”, nome_obra, “\n”;
- escreva “Informacoes: Obra: ”, nome_obra, “\n”;
- escreva “Informacoes: Editora: ”, editora, “\n”;
- escreva “Informacoes: Autor: ”, nome_autor, “\n”;
- escreva “Informacoes: Publicacao: ”, ano_pub, “\n”;
- escreva “Informacoes: Edicao: ”, nome_autor, “\n”;
- escreva “Informacoes: Paginas: ”, con_pags, “\n”;
- fimse
- cont = cont + 1
- fimenquanto
- fim
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement