Classificação
0 %
Popularidade
Opine
Descrição:
Estruturas Condicionais Se e Escolha Caso em Algoritmos. Veja como criar algoritmos com estruturas condicionais aninhadas e …
Não estou consiguindo fazer o do IMC pois na hora de executar diz que na linha 17 espera ter ENTAO
Ao tentar executar o primeiro exercício, o programa roda faz a media mas não exibe o aproveitamento.
Alguém poderia dar uma força aqui ? agradeço desde já e segue o código :
algoritmo "semnome"
var
N1, N2, N3, N4, NT:Real
inicio
Escreval("========================== ")
Escreval(" Calculo de media escolar ")
Escreval("========================== ")
Escreval("Digite sua nota do primeiro Bimestre: ")
Leia(N1)
Escreval("Digite sua nota do segundo Bimestre: ")
Leia(N2)
Escreval("Digite sua nota do terceiro Bimestre: ")
Leia(N3)
Escreval("E por ultimo, Digite sua nota do quarto Bimestre: ")
Leia(N4)
NT <- (N1 + N2 + N3 + N4)/4
Escreval("========================== ")
Escreval("Sua Media anual é de: ",NT)
Escreval("========================== ")
Se NT >=70 entao
Escreval("Parabens você foi aprovado")
senao
Se (NT >= 50) e (NT <70) entao
Escreval("Você está de recuperação")
senao
Escreval("Aluno Reprovado")
Se (NT >= 100) e (NT >=90) entao
Escreval("Aproveitamento do aluno (A) ")
senao
Se (NT >=89) e (NT >80) entao
Escreval("Aproveitamento do aluno(B)")
senao
Se (NT >=79) e (NT >70) entao
Escreval("Aproveitamento do aluno (C)")
senao
Se (NT >=69) e (NT >60) entao
Escreval("Aproveitamento do aluno (D) ")
senao
Se (NT >=59) e (NT >50) entao
Escreval("Aproveitamendo to aluno (E) ")
senao
Se (NT >50) entao
Escreval("Aproveitamento do aluno (F) ")
Fimse
Fimse
Fimse
Fimse
Fimse
Fimse
Fimse
Fimse
fimalgoritmo
Fiz um programa que converte alguns tipos de moedas.
Se alguém puder me ajudar a melhor, ou até mesmo apontar os erros de forma educada, são todos bem vindos !
algoritmo "semnome"
var
reais, dolar, euro, coroa : Real
inicio
Escreva("Quando Reais eu tenho R$ : ")
Leia(reais)
dolar <- reais / 5.31
euro <- reais / 5.52
coroa <- reais / 1.92
Escreval("Com R$: ", reais, " eu posso comprar US$: ", dolar:5:2)
Escreval("Com R$: ", reais, " eu posso comprar E$: ", euro:5:2)
Escreval("Com R$: ", reais, " eu posso comprar NOK$ : ", coroa:5:2)
Se (dolar >= 5000)entao
Escreval("Você pode viajar para o Estados Unidos ")
Senao
Escreval("Você não vai pode viajar para os Estados Unidos ! ")
Se (euro <= 7000)entao
Escreval("Você pode viajar para algum lugar da Europa ! ")
Senao
Escreval("Você não pode viajar para Europa ")
Se (coroa >= 2000)entao
Escreval("Você pode viajar para a Noruega ")
Senao
Escreval("Você não pode viajar para Noruega ")
Se (reais < 1000)entao
Escreval("Você não vai pode viajar 🙁 ")
FimSe
FimSe
FimSe
FimSe
fimalgoritmo
Não consigo criar esse código do imc porque o visualg não está aceitando ":" naquela parte
escreval("imc", imc :5:2)
Oq está errado? .O viusalg esta dizendo que n tem "entao", mas eu botei
algoritmo "semnome"
// Função :
// Autor :
// Data : 06/12/2022
// Seção de Declarações
var
M , A , IMC : Real
inicio
EScreva ("Seu peso: ")
Leia (M)
EScreva ("Sua altura: ")
Leia (A)
IMC <- M / A ^ 2
Escreva (" IMC: " , IMC:5:2)
Se ( IMC <16) entao
Escreva (" Magreza Grave" )
Senao
se (IMC >= 16) e (IMC <17) entao
Escreva (" Magrea moderada" )
senao
se (IMC >= 17) e (IMC < 18,5) ENTAO
escreva (" Magreza leve")
senao
se (IMC >= 18,5 ) e (IMC < 25) entao
escreva (" Saudável")
senao
se (IMC >= 25) e (IMC < 30 ) entao
escreva (" sobrepeso ")
senao
se (IMC >= 30 ) e (IMC < 35) entao
escreva (" Obesidade 1 Grau ")
senao
se (IMC >= 35 ) e (IMC < 40) entao
escereva ( " Obesidade 2 Grauu ")
senao
escreva (" Obesidade 3 Grau" )
fimse
fimse
fimse
fimse
Fimse
Fimse
fimse
fimalgoritmo
Apanhei por causa da posição do abs e da sequencia da variável dif na escolha(pegadinhas assim que agente aprende)
algoritmo "Futebol"
var
golsB, golsM, dif: Real
Status: Caracter
inicio
Escreval (" BANGU x MADUREIRA ")
Escreval ("—————————————————")
Escreva ("Quantos gols do BANGU? ")
Leia (golsB)
Escreva ("Quantos gols do MADUREIRA? ")
Leia (golsM)
Escreval ("—————————————————")
dif <- abs(golsB – golsM)
Escreval ("DIFERENÇA:", (dif))
Escolha dif
Caso 0
Status <- "EMPATE"
Caso 1, 2, 3
Status <- "PARTIRA NORMAL"
Outrocaso
Status <- "GOLEADA"
FimEscolha
EscrevaL ("STATUS: ",Status)
Escreval ("—————————————————")
fimalgoritmo
Achei um pouco longo. Se alguém tiver uma solução mais curta comente por favor! Obrigado.
algoritmo "AlunoAprov"
var
aprov: Caracter
pn, sn, med: Real
inicio
EscrevaL("———————————–")
EscrevaL(" ESCOLA JAVALI CANSADO ")
EscrevaL("———————————–")
Escreva("Primeira Nota: ")
Leia(pn)
Escreva("Segunda Nota: ")
Leia(sn)
EscrevaL("————- STATUS ————–")
med <- (pn + sn) / 2
Escreval("A média do aluno foi: ",med:4:2)
Se (med <= 10) e (med >= 9) entao
aprov <- "A"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
Senao
Se (med < 9) e (med >= 8) entao
aprov <- "B"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
Senao
Se (med < 8) e (med >= 7) entao
aprov <- "C"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
Senao
Se (med < 7) e (med >= 6) entao
aprov <- "D"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
Senao
Se (med < 6) e (med >= 5) entao
aprov <- "E"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
Senao
aprov <- "F"
Escreval("APROVEITAMENTO: ", aprov)
Escreva("———————————–")
FimSe
Fimse
Fimse
FimSe
FimSe
fimalgoritmo
acho que só eu fiz assim…
escreval("primeira time")
leia(notaa)
escreval("Segunda time")
leia(notab)
a<-notaa
b<-notab
r<-notab-notaa
re<-notaa-notab
se (r < 0) entao
se(re=0) entao
escreval(re)
escreval("empate")
senao
se (re<=2) entao
escreval(re)
escreval("Partida normal")
senao
se (re>=3) entao
escreval(re)
escreval("goleada")
fimse
fimse
fimse
senao
se(r=0) entao
escreval(r)
escreval("empate")
senao
se (r<=2) entao
escreval(r)
escreval("Partida normal")
senao
se (r>=3) entao
escreval(r)
escreval("goleada")
fimse
fimse
fimse
fimse
Exercício 2: Partida de Futebol, fiz assim utilizando "SE SENAO"
algoritmo "Partida de Futebol"
var
B, M, D: Inteiro
inicio
Escreval ("=======================")
Escreval (" PARTIDA DE FUTEBOL ")
Escreval (" BANGU X MADUREIRA ")
Escreval ("=======================")
Escreval ("Quantos gols fez BANGU?: ")
Leia (B)
Escreval ("Quantos gols fez MADUREIRA?: ")
Leia (M)
D <- Abs (B – M)
Escreval ("======RESULTADO=======")
Escreval ("DIFERENÇA: ", D)
Escreva ("STATUS: ")
Se (D >= 1) e (D <=3) entao
Escreval ("PARTIDA NORMAL ")
Senão
Se(D = 0) entao
Escreval ("EMBATE ")
SeNao
Se (D >= 4) entao
Escreval ("GOLEADA ")
FimSe
FimSe
FimSe
Escreval ("======================")
fimalgoritmo
Exercício 1: Aproveitamento do Aluno, fiz assim utilizando "SE SENAO"
algoritmo "Aproveitamento_Aluno"
var
N1,N2,N3,M:Real
inicio
Escreval ("=======================")
Escreval ( "Escola Javali Cansado ")
Escreval ("=======================")
Escreval ("Primeira Nota: ")
Leia (N1)
Escreval ("Segunda Nota: ")
Leia (N2)
Escreval ("Terceira Nota: ")
Leia (N3)
M <- (N1 + N2 + N3) / 3
Escreval ("——–STATUS——–")
Escreval ("MÉDIA: ", M:4:2)
SE (M >= 9) entao
Escreval ("APROVEITAMENTO: A ")
Escreval ("PARABÉNS, CONTINUE ASSIM")
SeNao
Se (M >= 8) e (M <= 8.9) entao
Escreval ("APROVEITAMENTO: B ")
Escreval ("PARABÉNS ")
SeNao
Se (M >= 7) E (M <= 7.9) entao
Escreval ("APROVEITAMENTO: C ")
Escreval ("PARABÉNS, MAIS PODE MELHORAR")
Senao
Se(M >= 6) E (M <= 6.9)entao
Escreval ("APROVEITAMENTO: D ")
Escreval ("CUIDADO, PRECISA MELHORAR")
SeNao
Se(M >= 5) E (M <= 5.9) entao
Escreval ("APROVEITAMENTO: E ")
Escreval ("PERIGO, TEM QUE ESTUDAR MAIS")
SeNao
Se (M <= 4.9) entao
Escreval ("APROVEITAMENTO: F ")
Escreval ("ESTAR MUITO RUIM")
FimSe
FimSe
FimSe
FimSe
FimSe
FimSe
Escreval ("———————–")
fimalgoritmo
Exercício 2: Partida de Futebol, fiz assim utilizando "ESCOLHA CASO"
algoritmo "Partida de Futebol"
var
B, M, D: Inteiro
inicio
Escreval ("=======================")
Escreval (" PARTIDA DE FUTEBOL ")
Escreval (" BANGU X MADUREIRA ")
Escreval ("=======================")
Escreval ("Quantos gols fez BANGU?: ")
Leia (B)
Escreval ("Quantos gols fez MADUREIRA?: ")
Leia (M)
D <- Abs (B – M)
Escreval ("======RESULTADO=======")
Escreval ("DIFERENÇA: ", D)
Escreva ("STATUS: ")
Escolha D
CASO 1,2,3
Escreval ("PARTIDA NORMAL ")
CASO 0
Escreval ("EMBATE ")
OUTROCASO
Escreval ("GOLEADA ")
FimEscolha
Escreval ("======================")
fimalgoritmo
Exercício 1: Aproveitamento do Aluno, fiz assim utilizando "ESCOLHA CASO"
algoritmo "Aproveitamento_Aluno"
var
N1,N2,N3,M:Real
inicio
Escreval ("=======================")
Escreval ( "Escola Javali Cansado ")
Escreval ("=======================")
Escreval ("Primeira Nota: ")
Leia (N1)
Escreval ("Segunda Nota: ")
Leia (N2)
Escreval ("Terceira Nota: ")
Leia (N3)
M <- (N1 + N2 + N3) / 3
Escreval ("——–STATUS——–")
Escreval ("MÉDIA: ", M:4:2)
Escolha M
CASO 9, 10
Escreval ("APROVEITAMENTO: A ")
Escreval ("PARABÉNS, CONTINUE ASSIM")
CASO 8
Escreval ("APROVEITAMENTO: B ")
Escreval ("PARABÉNS ")
CASO 7
Escreval ("APROVEITAMENTO: C ")
Escreval ("PARABÉNS, MAIS PODE MELHORAR")
CASO 6
Escreval ("APROVEITAMENTO: D ")
Escreval ("CUIDADO, PRECISA MELHORAR")
CASO 5
Escreval ("APROVEITAMENTO: E ")
Escreval ("PERIGO, TEM QUE ESTUDAR MAIS")
OUTROCASO
Escreval ("APROVEITAMENTO: F ")
Escreval ("ESTAR MUITO RUIM")
FimEscolha
Escreval ("———————–")
fimalgoritmo
e trace um quadrado*
algoritmo "semnome"
var
gb, gm, d: inteiro
inicio
Escreval("=================")
Escreval("Bangu x Madureira")
Escreval("=================")
Escreva("Quantos gols do Bangu? ")
leia(gb)
Escreva("Quantos gols do Madureira? ")
leia(gm)
d <- abs(gb – gm)
escreval("================")
escreval("DIFERENÇA: ", d)
Escreva("Status: ")
Escolha D
Caso 0
Escreval("EMPATE")
Caso 1, 2, 3
Escreval("NORMAL")
OutroCaso
Escreval("GOLEADA")
FimEscolha
escreva("================")
fimalgoritmo
o primeiro exercício eu fiz pelo escolha caso e deu certo sim
var
n1, n2, media:real
escreva("qual é a sua primeira nota? ")
leia(n1)
escreva("qual é a sua segunda nota? ")
leia(n2)
media<- (n1+n2)/2
escreval("a sua média é ", media)
escolha media
caso9, 10
escreva("APROVEITAMENTO: A")
caso 8, 9
escreva("APROVEITAMENTO: B")
caso 7, 8
escreva("APROVEITAMENTO: C")
caso 6, 7
escreva("APROVEITAMENTO: D")
caso 5, 6
escreva("APROVEITAMENTO: E")
outrocaso
escreva("se fudeu")
fimescolha
segundo exercício
Algoritmo "analise jogo de futebol"
Var
// Seção de Declarações das variáveis
g1, g2, placar: inteiro
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc…
escreval ("——————")
escreval ("Análise de partida")
escreval ("——————")
escreval ("digite qauntos gols o atletico fe: ")
leia (g1)
escreval ("quantos gols o cruzeiro fez: ")
leia (g2)
placar <- (g1 – g2)
escolha placar
caso 0
escreval ("partida empatada")
caso 1,2
escreval ("partida com placar normal")
fimescolha
se placar > 3 entao
escreval ("partida foi goleada.")
fimse
se g2 > g1 entao
placar <- g2 – g1
escolha placar
caso 0
escreval ("partida empatada")
caso 1,2
escreval ("partida com placar normal")
fimescolha
se placar > 3 entao
escreval ("A partida foi goleada.")
fimse
fimse
Fimalgoritmo
ESCOLHA (GOL)
var
T1, T2, DIF: INTEIRO
inicio
ESCREVA ("QUANTO GOL DO TIME 01? = ")
LEIA (T1)
ESCREVA ("QUANTOS GOLS DO TIME 02? = ")
LEIA (T2)
DIF <- T1 – T2
ESCOLHA DIF
CASO 0
ESCREVAL ("——————")
ESCREVAL ("DIFERENÇA: = ", DIF)
ESCREVAL ("STATUS: EMPATE")
ESCREVAL ("——————")
CASO 1,2,3,4
ESCREVAL ("——————")
ESCREVAL ("DIFERENÇA: = ", DIF)
ESCREVAL ("STATUS: PARTIDA NORMAL")
ESCREVAL ("——————")
OUTROCASO
ESCREVAL ("——————")
ESCREVAL ("DIFERENÇA: = ", DIF)
ESCREVAL ("GOLEADA !!!")
ESCREVAL ("——————")
FIMESCOLHA
fimalgoritmo
var
N1, N2, MEDIA: REAL
inicio
ESCREVA (————————–)
ESCREVA ("PRIMEIRA NOTA: ")
LEIA (N1)
ESCREVA ("SEGUNDA NOTA: ")
LEIA (N2)
MEDIA <- (N1 + N2) / 2
SE (MEDIA >= 9) ENTAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: A")
ESCREVAL ("—————————–")
SENAO
SE (MEDIA >= 8) E (MEDIA<9) ENTAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: B")
ESCREVAL ("—————————–")
SENAO
SE (MEDIA >=7) E (MEDIA <8) ENTAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: C")
ESCREVAL ("—————————–")
SENAO
SE (MEDIA>=6) E (MEDIA<7) ENTAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: D")
ESCREVAL ("—————————–")
SENAO
SE (MEDIA>=5) E (MEDIA<6) ENTAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: D")
ESCREVAL ("—————————–")
SENAO
ESCREVAL ("—————————–")
ESCREVAL ("MEDIA: ", MEDIA:5:2)
ESCREVAL ("APROVEITAMENTO: F")
ESCREVAL ("—————————–")
FIMSE
FIMSE
FIMSE
FIMSE
FIMSE
fimalgoritmo
algoritmo "APROVEITAMENTOdosALUNOS"
var
n1, n2, m: real
inicio
escreval("———————– ")
escreval(" classificação de Notas ")
escreval("———————–")
escreva(" primeira nota:")
leia(n1)
escreva(" segunda nota:")
leia(n2)
escreval("———————– ")
m <- (n1 + n2) /2
escreval("média:", m)
Se (m >= 9) e (m < 10) entao
escreval("APROVEITAMENTO: A")
escreval("———————")
Senao
Se (m >= 8) e (m < 9) entao
escreval("APROVEITAMENTO: B")
escreval("———————")
Senao
se (m >= 7) e (m < 8) entao
escreval("APROVEITAMENTO: C")
escreval("———————")
Senao
se (m >= 6) e (m < 7) entao
escreval("APROVEITAMENTO: D")
escreval("———————")
Senao
se (m < 5)entao
escreval("APROVEITAMENTO: F")
escreva("———————–")
FimSe
FimSe
fimSe
FimSe
FimSe
muito bom
PRIMEIRO EXECERCIO
algoritmo "semnome"
var
nota1, nota2: inteiro
res1: real
inicio
escreval("——————————-")
escreval(" ESCOLA EUCLIDES DA CUNHA ")
escreval("——————————-")
Escreval("Digite sua primeira nota: ")
leia(nota1)
Escreval("Digite sua segunda nota: ")
leia(nota2)
res1 <- (nota1 + nota2) /2
se res1 >= 9 entao
escreval("APROVADO, sua media foi: ", res1)
escreval("APROVEITAMENTO : A")
senao
se res1 >=7 entao
escreval("APROVADO, sua media foi: ", res1)
escreva("APROVEITAMENTO: B")
senao
se res1 >= 5 entao
escreval("APROVADO, sua media foi: ", res1)
escreva("APROVEITAMENTO: C")
senao
se res1 >= 3 entao
escreval("APROVADO, sua media foi: ", res1)
escreva("APROVEITAMENTO: D")
senao
se res1 >= 1 entao
escreval("APROVADO, sua media foi: ", res1)
escreva("APROVEITAMENTO: E")
senao
Escreval("REPROVADO")
fimse
fimse
fimse
fimse
fimse
fimalgoritmo
algoritmo "FUTEBOL"
//
//
var
GOLS,GOLSS,RESULTADO:INTEIRO
inicio
ESCREVAL("—————————–")
ESCREVAL(" SÃO PAULO X PALMEIRAS ")
ESCREVAL("—————————–")
ESCREVA("QUANTOS GOLS DO SÃO PAULO? ")
LEIA(GOLS)
ESCREVA("QUANTOS GOLS DO PALMEIRAS? ")
LEIA(GOLSS)
RESULTADO<-ABS(GOLS-GOLSS)
ESCREVAL("—————————–")
ESCREVAL("PLACAR: ",GOLS," X ",GOLSS)
SE(GOLS>=GOLSS)ENTÃO
ESCREVAL("DIFERENÇA DE GOLS:",GOLS-GOLSS)
SENAO
SE(GOLSS>=GOLS) ENTAO
ESCREVAL("DIFERENÇA DE GOLS:",GOLSS-GOLS)
FIMSE
FIMSE
SE(GOLS>GOLSS) ENTAO
ESCREVAL("SITUAÇÃO: VITÓRIA DO SÃO PAULO")
SENAO
SE(GOLSS>GOLS) ENTAO
ESCREVAL("SITUAÇÃO: VITÓRIA DO PALMEIRAS")
FIMSE
FIMSE
ESCOLHA RESULTADO
CASO 0
ESCREVAL("STATUS: EMPATE")
CASO 1,2,3
ESCREVAL("STATUS: PARTIDA NORMAL")
CASO 4,5,6,7,8,9,10
ESCREVAL("STATUS: GOLEADA")
FIMESCOLHA
ESCREVAL("—————————–")
fimalgoritmo
FIZ DESSA FORMA O PRIMEIRO EXERCICIO:
algoritmo "ESCOLA"
var
N1,N2,M:REAL
inicio
ESCREVAL("————————–")
ESCREVAL(" ESCOLA THALIS MOURA ")
ESCREVAL("————————–")
ESCREVA("PRIMEIRA NOTA:")
LEIA(N1)
ESCREVA("SEGUNDA NOTA:")
LEIA(N2)
M<-(N1+N2)/2
ESCREVAL("————————–")
ESCREVAL("MEDIA: ",M)
SE(M>=10) E (M<=9)ENTÃO
ESCREVAL("APROVEITAMENTO: A")
SENAO
SE(M>=8) E (M<=8.99)ENTAO
ESCREVAL("APROVEITAMENTO: B")
SENAO
SE(M>=7) E (M<=7.99)ENTAO
ESCREVAL("APROVEITAMENTO: C")
SENAO
SE(M>=6) E (M<=6.99) ENTAO
ESCREVAL("APROVEITAMENTO: D")
SENAO
SE (M>5) E (M<=5.99) ENTAO
ESCREVAL("APROVEITAMENTO: E")
SENAO
SE (M<=4.99)ENTAO
ESCREVAL("APROVEITAMENTO: F")
FIMSE
FIMSE
FIMSE
FIMSE
FIMSE
FIMSE
ESCREVAL("————————–")
fimalgoritmo
Exercicio02, com as estruturas " Se e Senao "
algoritmo "Exercicio03, Partida de Futebol "
var
placar1, placar2, Tot_Pla: Inteiro
inicio
EscrevaL ("São Paulo x Palmeiras ")
EscrevaL ("————————– ")
Escreva ("Quantos gols do SÃO PAULO? ")
Leia (placar1)
Escreva ("Quantos gols do PALMEIRAS? ")
Leia (placar2)
Tot_Pla <- Abs (placar1 – placar2)
Se (Tot_Pla = 0) entao
EscrevaL ("———————- ")
EscrevaL ("DIFERENÇA DE: ", Tot_Pla)
EscrevaL ("STATUS: EMPATE ")
Escreva ("———————- ")
Senao
Se (Tot_Pla = 1) ou (Tot_Pla <= 3) entao
EscrevaL ("———————- ")
EscrevaL ("DIFERENÇA DE: ", Tot_Pla)
EscrevaL ("STATUS: PARTIDA NORMAL ")
Escreva ("———————- ")
Senao
Se (Tot_Pla >= 4) entao
EscrevaL ("——————— ")
EscrevaL ("DIFERENÇA DE: ", Tot_Pla)
EscrevaL ("STATUS: GOLEADA ")
Escreva ("——————— ")
FimSe
FimSe
FimSe
fimalgoritmo
Exercício 1
algoritmo "aproveitamento do aluno"
var
n1, n2, m: real
inicio
Escreval("————————–")
Escreval(" ESCOLA JAVALI CANSADO ")
Escreval("————————–")
Escreva("Primeira Nota: ")
Leia(n1)
Escreva("Segunda Nota: ")
Leia(n2)
m <- (n1 +n2)/2
Escreval("——————-")
Escreval(" MÉDIA: ",m:2:1)
Se (m <=10) e (m>=9) entao
Escreval(" APROVEITAMENTO: A")
Escreval("——————-")
senao
Se (m<=8.9) e (m>=8) entao
Escreval(" APROVEITAMENTO: B")
Escreval("——————-")
senao
Se (m<=7.9) e (m>=7) entao
Escreval(" APROVEITAMENTO: C")
Escreval("——————-")
senao
Se (m<=6.9) e (m>=6) entao
Escreval(" APROVEITAMENTO: D")
Escreval("——————-")
senao
Se (m<=5.9) e (m>=5) entao
Escreval(" APROVEITAMENTO: E")
Escreval("——————-")
senao
Escreval(" APROVEITAMENTO: F")
Escreval("——————-")
FimSe
FimSe
FimSe
FimSe
FimSe
fimalgoritmo
Exercício 1 , fiz desse modo. Quem quiser ter uma base, à vontade.
algoritmo "EscolaAABB"
var
P1, P2, M: Real
inicio
EscrevaL("———————–")
EscrevaL(" ESCOLA AABB ")
EscrevaL("———————–")
Escreva("PRIMEIRA NOTA: ")
Leia(P1)
Escreva("SEGUNDA NOTA: ")
Leia(P2)
M <- (P1 + P2)/2
EscrevaL("———————————-")
EscrevaL("MEDIA: ", M)
Se(M >= 9.0) e (M <10) entao
EscrevaL("APROVEITAMENTO: A ")
senao
Se(M >= 8) e (M <8.9) entao
EscrevaL("APROVEITAMENTO: B ")
senao
se(M >=7) e (M <7.9) entao
EscrevaL("APROVEITAMENTO: C ")
senao
se(M >= 6) e (M < 6.9) entao
EscrevaL("APRVEITAMENTO: D ")
senao
Se(M >= 5) e (M < 5.9) entao
EscrevaL("APROVEITAMENTO: E ")
senao
EscrevaL("APROVEITAMENTO: F ")
fimse
fimse
fimse
fimse
fimse
EscrevaL("———————————-")
fimalgoritmo