Informática, perguntado por phetersonlubke, 1 ano atrás

Algoritmo que solicita o número de alunos de uma turma, depois o nome e duas notas de cada um para calcular a média. Até ai tudo bem, mas depois de cadastrar a turma inteira o algoritmo tem que perguntar se voce deseja cadastrar outra turma< (s) ou (n), e se o usuário digitar algo diferente de s ou de n ele tem que retornar uma mensagem de erro e encerrar o programa. Fiz desse jeito usando o repita mas não deu certo no visualg. ME AJUDEM, POR FAVOR!!!

Var
i,na:inteiro
x,y,nome:caractere
n1,n2,m:real


Inicio
repita
escreval("Informe a quantidade de alunos da turma")
leia (na)
para i de 1 ate na faca
escreval("Digite o nome do aluno")
leia (nome)
escreval("Digite a nota do primeiro bimestre")
leia (n1)
escreval("digite a nota do segundo bimestre")
leia (n2)
m<-(n1+n2)/2
escreval(nome)
escreval("Média=",m)
fimpara
escreval("Deseja cadastrar outra turma, (s)sim ou (n)não?")
leia (x)
se x ="s"ou"n" entao
y<-x
senao
escreval("ERRO!")
ate y="n"
fimse
fimrepita


Fimalgoritmo

Soluções para a tarefa

Respondido por aquiles1987
1
algoritmo "semnome"// Função :// Autor :Aquiles// Data : 18/11/2016// Seção de DeclaraçõesVari,na:inteirox,y,nome:caracteren1,n2,m:real

Iniciorepitaescreval("Informe a quantidade de alunos da turma")leia (na)para i de 1 ate na facaescreval("Digite o nome do aluno")leia (nome)escreval("Digite a nota do primeiro bimestre")leia (n1)escreval("digite a nota do segundo bimestre")leia (n2)m<-(n1+n2)/2escreval(nome)escreval("Média=",m)fimparaescreval("Deseja cadastrar outra turma, (s)sim ou (n)não?")leia (x)se (x ="s")ou (x ="n") entaoy<-xsenaoy<-"n"escreval("ERRO!")fimseate y= "n"
fimrepita

Fimalgoritmo

aquiles1987: teve dois erros simples vc com (x="s") ou (x="n"), outro você colocou fimse depois ate y="n"
phetersonlubke: valeu irmão, mas no seu rodou a parte de dar erro? Pq no meu funcionou com o sim, mas o não e o erro ta dando problema (talvez seja esse visualg bugado mesmo).
aquiles1987: Meu rodou tranquilo
aquiles1987: poxa desconfigurou minha resposta quando colei
aquiles1987: algoritmo "semnome"
// Função :
// Autor :
// Data : 18/11/2016
// Seção de Declarações
Var
i,na:inteiro
x,y,nome:caractere
n1,n2,m:real

Inicio
repita
escreval("Informe a quantidade de alunos da turma")
leia (na)
para i de 1 ate na faca
escreval("Digite o nome do aluno")
leia (nome)
escreval("Digite a nota do primeiro bimestre")
leia (n1)
escreval("digite a nota do segundo bimestre")
leia (n2)
m<-(n1+n2)/2
escreval(nome)
escreval("Média=",m)
fimpara
escreval("Deseja cadastrar outra turma, (s)sim ou (n)não?")
leia (x)
aquiles1987: se (x ="s")ou (x ="n") entao
y<-x
senao
y<-"n"
escreval("ERRO!")
fimse
ate y= "n"

fimrepita

Fimalgoritmo
Perguntas interessantes