Buscar

visualg_algoritmos_aula08+exercícios

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

aula08/aula-pratica/01 - NotasAluno.alg
algoritmo "Aluno"
var
 N1, N2, M: Real
inicio
 Escreva("Primeira Nota: ")
 Leia(N1)
 Escreva("Segunda Nota: ")
 Leia(N2)
 M <- (N1 + N2) / 2
 EscrevaL("A media do aluno foi ", M:4:2)
 Se (M >= 7) entao
 EscrevaL("Aluno APROVADO")
 senao
 Se (M >= 5) e (M <7) entao
 EscrevaL ("Aluno em RECUPERACAO")
 senao
 EscrevaL ("Aluno REPROVADO")
 FimSe
 FimSe
fimalgoritmo
aula08/aula-pratica/02 - ImcCompleto.alg
algoritmo "CalculoIMC"
var
 M, A, IMC: Real
inicio
 Escreva("Massa (Kg): ")
 Leia(M)
 Escreva("Altura (m): ")
 Leia(A)
 IMC <- M / (A ^ 2)
 EscrevaL("IMC: ", IMC:5:2)
 Se (IMC < 17) entao
 EscrevaL ("Muito abaixo do Peso")
 senao
 Se (IMC >= 17) e (IMC < 18.5) entao
 EscrevaL ("Abaixo so Peso")
 senao
 Se (IMC >= 18.5) e (IMC < 25) entao
 EscrevaL ("Peso ideal")
 senao
 Se (IMC >= 25) e (IMC < 30) entao
 EscrevaL ("Sobrepeso")
 senao
 Se (IMC >= 30) e (IMC < 35) entao
 EscrevaL ("Obesidade")
 senao
 Se (IMC >= 35) e (IMC < 40) entao
 EscrevaL ("Obesidade Severa")
 senao
 EscrevaL ("Obesidade Morbida")
 FimSe
 FimSe
 FimSe
 FimSe
 FimSe
 FimSe
fimalgoritmo
aula08/aula-pratica/03 - CriancaEsperanca.alg
algoritmo "CriancaEsperanca"
var
 D : Inteiro
 Valor: Real
inicio
 EscrevaL ("---------------------------")
 EscrevaL (" CRIANCA ESPERANCA ")
 EscrevaL ("---------------------------")
 Escreval (" Muito obrigado por ajudar ")
 Escreval (" [1] para doar R$10 ")
 Escreval (" [2] para doar R$25 ")
 Escreval (" [3] para doar R$50 ")
 Escreval (" [4] para doar outros valores ")
 Escreval (" [5] para cancelar ")
 Leia (D)
 Escolha D
 Caso 1
 Valor <- 10
 Caso 2
 Valor <- 25
 Caso 3
 Valor <- 50
 Caso 4
 Escreva ("Qual o valor da doacao? R$")
 Leia (Valor)
 Caso 5
 Valor <- 0
 FimEscolha
 Escreval ("------------------------")
 Escreval (" SUA DOACAO FOI DE R$", Valor)
 Escreval (" MUITO OBRIGADO!")
 Escreval ("------------------------")
fimalgoritmo
aula08/aula-pratica/04 - Dependentes Funcionario.alg
algoritmo "DependentesFuncionario"
var
 Nome: Caractere
 Sal, NSal : Real
 Dep : Inteiro
inicio
 Escreva ("Qual o nome do Funcionario? ")
 Leia (Nome)
 Escreva ("Qual o salario do Funcionario? R$")
 Leia (Sal)
 Escreva ("Qual e a quantidade de dependentes? ")
 Leia (Dep)
 Escolha Dep
 Caso 0
 NSal <- Sal + (Sal*5/100)
 Caso 1, 2, 3
 NSal <- Sal + (Sal*10/100)
 Caso 4, 5, 6
 NSal <- Sal + (Sal*15/100)
 OutroCaso
 NSal <- Sal + (Sal*18/100)
 FimEscolha
 EscrevaL ("O novo salario de ", Nome, " sera de R$", NSal:5:2)
fimalgoritmo
aula08/aula08-leia.txt
==================================
SEJA BEM-VINDO AO CURSOEMVIDEO.COM
Cursos GRATIS feitos com QUALIDADE
==================================
Essa aula faz parte de um pacote do Curso de Algoritmos, criado pelo Prof. Gustavo Guanabara. 
A chave para o bom aprendizado e sempre a PRATICA, entao pratique muito e nao deixe de acompanhar todas as aulas disponiveis no site abaixo:
------------------------------------------------
www.cursoemvideo.com/course/curso-de-algoritmos/
------------------------------------------------
Todas as aulas sao gratuitas, mas possuem o direito autoral reservado ao autor, Gustavo Guanabara.
Todos os testes praticos feitos durante a aula estao na pasta AULA-PRATICA.
Todos os exercicios propostos pelo professor estao na pasta EXERCICIOS-PROPOSTOS.
Abra o VISUALG e clique em Arquivo > Abrir ou pressione Ctrl+A. Em seguida, localize o arquivo desejado em sua respectiva pasta.
BONS ESTUDOS!
__MACOSX/aula08/._aula08-leia.txt
��������Mac OS X �����	���2���¬�������Þ��������������������������������������ATTR�������Þ���˜���F�������������������˜���F���com.apple.quarantine�q/0001;537a0167;Google\x20Chrome;5DE65D9A-A03D-4704-A3DF-C75482B5A8D0�
aula08/exercicios-propostos/01-AproveitamentoAluno.alg
algoritmo "SituacaoAluno"
var
 nota1, nota2, media: Real
inicio
 EscrevaL("-----------------------")
 EscrevaL(" ESCOLA JAVALI CANSADO ")
 EscrevaL("-----------------------")
 Escreva("Primeira Nota: ")
 Leia(nota1)
 Escreva("Segunda Nota: ")
 Leia(nota2)
 media <- (nota1 + nota2)/2
 EscrevaL("-----------------------")
 EscrevaL(" MEDIA: ", media:3:1)
 Se (media >=9) e (media <= 10) entao
 EscrevaL(" APROVEITAMENTO: A ")
 senao
 Se (media >= 8) e (media < 9) entao
 EscrevaL (" APROVEITAMENTO: B ")
 senao
 Se (media >= 7) e (media < 8) entao
 EscrevaL (" APROVEITAMENTO: C ")
 senao
 Se (media >= 6) e (media < 7) entao
 EscrevaL (" APROVEITAMENTO: D ")
 senao
 Se (media >= 5) e (media < 6) entao
 EscrevaL (" APROVEITAMENTO: E ")
 senao
 EscrevaL(" APROVEITAMENTO: F ")
 FimSe
 FimSe
 FimSe
 FimSe
 FimSe
 EscrevaL("-----------------------")
fimalgoritmo
aula08/exercicios-propostos/02-TimesFutebol.alg
algoritmo "PartidaFutebol"
var
 gols1, gols2, dif: Real
inicio
 EscrevaL("-----------------------")
 EscrevaL(" BANGU x MADUREIRA ")
 EscrevaL("-----------------------")
 Escreva("Quantos gols do BANGU? ")
 Leia(gols1)
 Escreva("Quantos gols do MADUREIRA? ")
 Leia(gols2)
 Se (gols1 > gols2) entao
 dif <- gols1 - gols2
 senao
 dif <- gols2 - gols1
 FimSe
 EscrevaL("-----------------------")
 EscrevaL(" DIFERENCA: ", dif)
 Escolha dif
 Caso 0
 EscrevaL(" STATUS: EMPATE ")
 Caso 1, 2, 3
 EscrevaL(" STATUS: PARTIDA NORMAL ")
 Caso 4,5, 6, 7
 EscrevaL(" STATUS: GOLEADA ")
 OutroCaso
 EscrevaL(" STATUS: ALGO INCOMUM. ")
 EscrevaL(" Voce digitou os dados corretos? ")
 FimEscolha
 EscrevaL("-----------------------")
fimalgoritmo

Teste o Premium para desbloquear

Aproveite todos os benefícios por 3 dias sem pagar! 😉
Já tem cadastro?

Outros materiais