Programação para Redes de Computadores (técnico) (diário 2012-1)

Lógica de Programação

27/02

• Apresentação da disciplina.
• Linguagem de programação estruturada: instruções, operadores, tipos, alteração do fluxo do código em tempo de execução.
• Apresentação do ambiente e linguagem Portugol.
• Primeiro problema em Portugol: dados dois números, verificar se um é múltiplo do outro.

// Início do programa.
inicio

// Pedir o primeiro número.
escrever "Por favor, digite um número natural: "
inteiro primeiroNumero
ler primeiroNumero

// Pedir o segundo número.
escrever "E agora, digite um segundo número natural: "
inteiro segundoNumero
ler segundoNumero

// Calcule se o primeiro é múltiplo do segundo.
inteiro resto
resto <- primeiroNumero % segundoNumero

// Se for, mostre na tela.
se resto = 0 então
    escrever "O primeiro é múltiplo do segundo."
fimse

// Senão, calcule se o segundo é múltiplo do primeiro.
inteiro resto2
resto2 <- segundoNumero % primeiroNumero

// Se for, mostre na tela.
se resto2 = 0 então
    escrever "O segundo é múltiplo do primeiro."
fimse

se resto =/= 0 e resto2 =/= 0 então
    escrever "Não há múltiplos."
fimse

// Fim do programa.
fim

• Segundo problema: um conversor decimal-binário para números até 255.

05/03

Conversor de decimal para binário utilizando apenas estruturas de decisão:

inicio
    escrever "Por favor , digite um número entre 0 e 255: "
    inteiro numero
    ler numero
    inteiro resto
    resto <- numero - 128
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 64
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 32
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 16
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 8
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 4
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 2
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
    resto <- numero - 1
    se resto >= 0 entao
        escrever "1"
        numero <- resto
    senao
        escrever "0"
    fimse
fim

Conversor de decimal para binário utilizando estrutura de repetição:

inicio
    inteiro numero
    inteiro resto
    inteiro expoente   
    escrever "Por favor , digite um número entre 0 e 255: "
    ler numero
    expoente <- 7
    repete
        resto <- numero - ( 2 ^ expoente )
        se resto >= 0 entao
            escrever "1"
            numero <- resto
        senao
            escrever "0"
        fimse
        expoente <- expoente - 1
    ate expoente < 0
fim

Referências

• Popularidade das linguages de programação: http://www.langpop.com
• Material introdutório e avançado sobre shell script: http://www.aurelio.net/shell/
• Jogos de lógica:
  • Light Bot
  • Orbox
  • HDOS Databank Request 01

---

Voltar para página principal da disciplina