Logica_de_Programacao_3_Edicao_Livro
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
Capítulo 5 Arquivos 1 117
FIGURA 5.5
Ficha de cadastro de aluno
Número de matrícula: ______ _ RG: __________ _
Nome completo:
Data de nascimento: Sexo: [M-Masculino, F-Feminino]
Curso: ________ _ [!-Pedagogia, 2-Direito, 3-Matemática]
Se o arquivo foi corret.arnente concebido, perrnitirá o acesso por rneio de urn posiciona-
1nento com o auxílio da chave RG. Porém, a coordenação dessa entidade sornente identifica
seus alunos através de seus respectivos números de 1nau·ícula e, nessa circunstância, caso
queira obter inforrnações sobre algu1n aluno a partir de seu núrnero de rnatrícula, terá de
fazer un1a busca seqüe11cial no arquivo concebido randomicamente.
ALGORITMO 5.9
Exemplo de arquivo randômico acessado seqüencialmente
1. inicio
2. tipo aluno= registro
3. inteiro: RG, Mat, Curso;
4. caracter: Nome, DataNasc, Sexo;
5. fimregistro;
6. tipo faculdade= arquivo composto de aluno;
7. aluno: dados; li variável de registro
8. faculdade: matriculas; li variável de arquivo
9. inteiro: matProcurada;
10. leia (matProcurada);
11. abra (matriculas);
12. repita
13 . avance (matriculas);
14. copie (matriculas, dados);
15. até (fda(matriculas)) ou (dados.Mat = matProcurada);
16. se (dados.Mat = matProcurada)
17. então escreva (dados.Mat, dados.Nome);
18. senão escreva ( 11 Aluno não registrado! 11 ) ;
19. fimse;
20. feche (matriculas);
21. fim.
Con1 o decorrer do tempo, pode-se tornar n1ais usual o acesso a esse arquivo via nú1nero
ele n1atrícula, quando cairia em desuso seu acesso clireto do n1oclo como fora planejado.
Nessa ocasião, se1ia rnelhor 'converter' o arquivo concebido da forma antig'd para outro
concebido randomica1nente através da chave número de 111atrícula.
Nessa faculdade, os códigos de 1nau·ícula são estruturados de rnodo que, dos sete dígitos
desse código, os quatro primeiros representem o a110 de n1atrícula (a faculdade iniciou suas