Eigenlieb 9 Postado Setembro 23, 2006 Share Postado Setembro 23, 2006 Olá! Postem aqui programas em português estruturado. O objetivo é disponibilizar material para estudo e análise. Postem somente programas completos. Para programas incompletos usem o tópico: Exercicios Lembrem-se, explicações detalhadas são bem vindas! Abraços Link para o comentário Compartilhar em outros sites More sharing options...
Eigenlieb 9 Postado Setembro 23, 2006 Autor Share Postado Setembro 23, 2006 (editado) Programa 01 - Complemento para o tópico: Aula 3 - Português Estruturado ---------------------------------------------------------------- Temos gravados em um disco vários números com dois algarismos. Neste disco os números não estão repeticos. Porém, igualmente, não estão ordenados. Desejamos elaborar um esquema lógico (Programa) que nos permita encontrar o maior entre esses números. Elaboração do programa: Parte descritiva: - Nome do arquivo de entrada: ARQ1 - Nome do registro de entrada: RG1 (Area Numérica com duas posições) - Nome do arquivo de saída: ARQ2 - Nome do registro de saída: RG2 (Area Numérica com duas posições) Procedimentos: (Lógica) 01. Abrir ARQ1 E ARQ2 02. Mover zeros para RG2 03. Ler ARQ1, se acabar o arquivo, gravar RG2, fechar ARQ1 E ARQ2, e encerrar o processamento. 04. Se RG1 for maior que RG2, mover RG1 para RG2. Ir para 03. Massa de testes: (Resolução)Parte descritiva: - Nome do arquivo de entrada: ARQ1 - Nome do registro de entrada: RG1 (Area Numérica com duas posições) - Nome do arquivo de saída: ARQ2 - Nome do registro de saída: RG2 (Area Numérica com duas posições) Conteúdo de ARQ1: 20 11 25 61 Conteúdo de ARQ2: Vazio Procedimentos: (Lógica) 01. Abrir ARQ1 E ARQ2 02. Mover zeros para RG2 03. Ler ARQ1, se acabar o arquivo, gravar RG2, fechar ARQ1 E ARQ2, e encerrar o processamento. 04. Se RG1 for maior que RG2, mover RG1 para RG2. Ir para 03. Comparação - Procedimento 04. Primeiro número: 20 20 > 00 Arquivo não acabou. Segundo número: 11 11 < 20 Arquivo não acabou. Teceiro número: 25 25 > 20 Arquivo não acabou. Quarto número: 61 61 > 25 Arquivo acabou. Conforme procedimento 03. Gravar RG2, fechar ARQ1 E ARQ2, e encerrar o processamento. ---------------------------------------------------------------- Abraços Editado Setembro 23, 2006 por Eigenlieb Link para o comentário Compartilhar em outros sites More sharing options...
Nostradamus 6 Postado Setembro 23, 2006 Share Postado Setembro 23, 2006 @Eigenlieb Muito bom, vamos ver se os users se interessam. Link para o comentário Compartilhar em outros sites More sharing options...
Posts Recomendados