Mudanças entre as edições de "Programação para Redes de Computadores (técnico) (diário 2012-2)"
Ir para navegação
Ir para pesquisar
Linha 15: | Linha 15: | ||
=Aulas= | =Aulas= | ||
− | == | + | ==08/10== |
− | Teste de conhecimento 1: instalação manual do Portugol. | + | * Teste de conhecimento 1: instalação manual do Portugol. |
+ | * Sobre a matéria: entendimento de do sistema computacional de Von Neumann. | ||
Um número é primo? Em Portugol: | Um número é primo? Em Portugol: | ||
Linha 53: | Linha 54: | ||
E se for perfeito? O que muda no código anterior? | E se for perfeito? O que muda no código anterior? | ||
+ | |||
+ | ==15/10== | ||
+ | * Teste de conhecimento: Matemática básica aplicada. | ||
+ | * Sobre a matéria: tipos de funções ou procedimentos de um programa. | ||
+ | |||
+ | Um triângulo é pitagórico? | ||
+ | <syntaxhighlight lang=c> | ||
+ | inicio | ||
+ | |||
+ | // Entrada de dados | ||
+ | inteiro a, b, c | ||
+ | escrever "Por favor, digite um número inteiro: " | ||
+ | ler a | ||
+ | escrever "Agora, outro número inteiro: " | ||
+ | ler b | ||
+ | escrever "E, por último, mais um número inteiro: " | ||
+ | ler c | ||
+ | |||
+ | // Processamento | ||
+ | inteiro a2 | ||
+ | a2 <- potencia(a, 2) | ||
+ | |||
+ | inteiro b2c2 | ||
+ | b2c2 <- potencia(b, 2) + potencia(c, 2) | ||
+ | |||
+ | texto resposta | ||
+ | se (a2 = b2c2) então | ||
+ | resposta <- "é pitagórico." | ||
+ | senão | ||
+ | resposta <- "não é pitagórico." | ||
+ | fimSe | ||
+ | |||
+ | // Saída de dados | ||
+ | escrever "O triângulo ", resposta | ||
+ | |||
+ | fim | ||
+ | </syntaxhighlight> | ||
+ | |||
+ | Um número é potência de outro? | ||
+ | <syntaxhighlight lang=c> | ||
+ | inicio | ||
+ | |||
+ | //Entrada de dados | ||
+ | texto resposta | ||
+ | inteiro numero | ||
+ | escrever "Por favor, digite um número inteiro: " | ||
+ | ler numero | ||
+ | |||
+ | // Processamento | ||
+ | real raizquadrada, resto | ||
+ | raizquadrada <- raiz(numero) | ||
+ | resto <- frac(raizquadrada) | ||
+ | se (resto > 0) então | ||
+ | resposta <- "não é potência quadrada de outro número inteiro: " | ||
+ | senao | ||
+ | resposta <- "é potência de: " | ||
+ | fimSe | ||
+ | |||
+ | // Saída de dados | ||
+ | escrever resposta, raizquadrada | ||
+ | fim | ||
+ | </syntaxhighlight> | ||
+ | |||
+ | Outra forma (alternativa): | ||
+ | <syntaxhighlight lang=c> | ||
+ | inicio | ||
+ | |||
+ | // Entrada de dados | ||
+ | inteiro numero | ||
+ | escrever "Por favor, digite um número inteiro: " | ||
+ | ler numero | ||
+ | |||
+ | // Processamento | ||
+ | texto resposta | ||
+ | inteiro respostaNumero | ||
+ | real expoente, resultado, rodada | ||
+ | para rodada de 2 ate 5 passo 1 | ||
+ | expoente <- 1 / rodada | ||
+ | resultado <- potencia(numero, expoente) | ||
+ | se (frac(resultado) = 0) então | ||
+ | resposta <- "é potência de " | ||
+ | respostaNumero <- int(resultado) | ||
+ | fimSe | ||
+ | próximo | ||
+ | |||
+ | // Saída de dados | ||
+ | escrever resposta | ||
+ | escrever respostaNumero | ||
+ | |||
+ | fim | ||
+ | </syntaxhighlight> | ||
+ | |||
+ | Desenhando uma "caixa" em volta de um número até 9999: | ||
+ | <syntaxhighlight lang=c> | ||
+ | inicio | ||
+ | |||
+ | // Entrada de dados | ||
+ | inteiro numero | ||
+ | escrever "Por favor, digite SEMPRE um número inteiro: " | ||
+ | ler numero | ||
+ | |||
+ | // Processamento | ||
+ | inteiro colunas, linhaembranco | ||
+ | colunas <- 1 | ||
+ | se (numero > 9) então | ||
+ | colunas <- 2 | ||
+ | fimSe | ||
+ | se (numero > 99) então | ||
+ | colunas <- 3 | ||
+ | fimSe | ||
+ | se (numero > 999) então | ||
+ | colunas <- 4 | ||
+ | fimSe | ||
+ | se (numero > 9999) então | ||
+ | colunas <- 5 | ||
+ | fimSe | ||
+ | colunas <- colunas + 4 | ||
+ | linhaembranco <- colunas - 2 | ||
+ | |||
+ | // Saída de dados | ||
+ | inteiro coluna | ||
+ | para coluna de 1 ate colunas passo 1 | ||
+ | escrever "!" | ||
+ | próximo | ||
+ | escrever "\n" | ||
+ | |||
+ | escrever "!" | ||
+ | para coluna de 1 ate linhaembranco passo 1 | ||
+ | escrever " " | ||
+ | próximo | ||
+ | escrever "!\n" | ||
+ | |||
+ | escrever "! ", numero, " !" | ||
+ | escrever "\n" | ||
+ | |||
+ | escrever "!" | ||
+ | para coluna de 1 ate linhaembranco passo 1 | ||
+ | escrever " " | ||
+ | próximo | ||
+ | escrever "!\n" | ||
+ | |||
+ | para coluna de 1 ate colunas passo 1 | ||
+ | escrever "!" | ||
+ | próximo | ||
+ | |||
+ | fim | ||
+ | </syntaxhighlight> |
Edição das 22h26min de 15 de outubro de 2012
Endereço encurtado: http://bit.ly/prc20122
Avaliação
São 4 avaliações, uma por mês - sem data pré-estabelecida:
- Outubro
- Novembro
- Dezembro
- Março
O conceito final da disciplina é elaborado da seguinte forma:
- A: todas as avaliações em A.
- B: no máximo 1 C.
- C: no máximo 1 D, e para cada D no mínimo um B correspondente.
- D: demais casos.
Aulas
08/10
- Teste de conhecimento 1: instalação manual do Portugol.
- Sobre a matéria: entendimento de do sistema computacional de Von Neumann.
Um número é primo? Em Portugol:
inicio
// Entrada de dados
escrever "Por favor, escreva um número inteiro: "
inteiro dividendo
ler dividendo
// Processamento
inteiro divisor
inteiro divisores
inteiro resto
divisores <- 0
para divisor de (dividendo - 1) até 2 passo -1
escrever "."
resto <- dividendo % divisor
se resto = 0 então
divisores <- divisores + divisor
fimSe
próximo
texto resposta
se divisores > 0 então
resposta <- " não é primo."
senão
resposta <- " é primo."
fimSe
// Saída de dados
escrever "Calculei que ", dividendo, resposta
fim
E se for perfeito? O que muda no código anterior?
15/10
- Teste de conhecimento: Matemática básica aplicada.
- Sobre a matéria: tipos de funções ou procedimentos de um programa.
Um triângulo é pitagórico?
inicio
// Entrada de dados
inteiro a, b, c
escrever "Por favor, digite um número inteiro: "
ler a
escrever "Agora, outro número inteiro: "
ler b
escrever "E, por último, mais um número inteiro: "
ler c
// Processamento
inteiro a2
a2 <- potencia(a, 2)
inteiro b2c2
b2c2 <- potencia(b, 2) + potencia(c, 2)
texto resposta
se (a2 = b2c2) então
resposta <- "é pitagórico."
senão
resposta <- "não é pitagórico."
fimSe
// Saída de dados
escrever "O triângulo ", resposta
fim
Um número é potência de outro?
inicio
//Entrada de dados
texto resposta
inteiro numero
escrever "Por favor, digite um número inteiro: "
ler numero
// Processamento
real raizquadrada, resto
raizquadrada <- raiz(numero)
resto <- frac(raizquadrada)
se (resto > 0) então
resposta <- "não é potência quadrada de outro número inteiro: "
senao
resposta <- "é potência de: "
fimSe
// Saída de dados
escrever resposta, raizquadrada
fim
Outra forma (alternativa):
inicio
// Entrada de dados
inteiro numero
escrever "Por favor, digite um número inteiro: "
ler numero
// Processamento
texto resposta
inteiro respostaNumero
real expoente, resultado, rodada
para rodada de 2 ate 5 passo 1
expoente <- 1 / rodada
resultado <- potencia(numero, expoente)
se (frac(resultado) = 0) então
resposta <- "é potência de "
respostaNumero <- int(resultado)
fimSe
próximo
// Saída de dados
escrever resposta
escrever respostaNumero
fim
Desenhando uma "caixa" em volta de um número até 9999:
inicio
// Entrada de dados
inteiro numero
escrever "Por favor, digite SEMPRE um número inteiro: "
ler numero
// Processamento
inteiro colunas, linhaembranco
colunas <- 1
se (numero > 9) então
colunas <- 2
fimSe
se (numero > 99) então
colunas <- 3
fimSe
se (numero > 999) então
colunas <- 4
fimSe
se (numero > 9999) então
colunas <- 5
fimSe
colunas <- colunas + 4
linhaembranco <- colunas - 2
// Saída de dados
inteiro coluna
para coluna de 1 ate colunas passo 1
escrever "!"
próximo
escrever "\n"
escrever "!"
para coluna de 1 ate linhaembranco passo 1
escrever " "
próximo
escrever "!\n"
escrever "! ", numero, " !"
escrever "\n"
escrever "!"
para coluna de 1 ate linhaembranco passo 1
escrever " "
próximo
escrever "!\n"
para coluna de 1 ate colunas passo 1
escrever "!"
próximo
fim