bom , to tentando usar vetores nesse exercicio e to com dificuldades , alguém pode me ajudar a notar o erro, segundo o visualg o problema esta aqui:
para cont <- 1 ate 5 faca
escreval( nome[cont], nota[cont])
vou mandar o codigo por completo, na verdade eu testei de dois jeitos o 1 com apenas um contador
algoritmo "corrigeprovas"
var gabarito: vetor[1..5] de caractere
resp: vetor[1..5] de caractere
nome: vetor [1..3] de caractere
nota: vetor [1..3] de real
cont: inteiro
media, soma : real
inicio
cont<-1
soma<-0
escreval("cadastro de gabarito")
escreval("====================")
para cont <- 1 ate 5 faca
escreva("questão " , cont, ": ")
leia(gabarito[cont])
fimpara
limpatela
escreval("====================")
escreval("cadastro das respostas provas")
para cont <- 1 ate 3 faca
escreval("====================")
escreval("Aluno", cont)
escreval("====================")
escreva("nome do aluno:")
leia(nome[cont])
nota[cont]<-soma
escreval("respostas dadas")
para cont <- 1 ate 5 faca
escreva("questão", cont, ": " )
leia(resp[cont])
se ( resp[cont] = gabarito[cont]) entao
soma<-soma + 2
fimse
fimpara
fimpara
escreval( "RESULTADOS")
escreval("===============")
para cont <- 1 ate 5 faca
escreval( nome[cont], nota[cont])
fimpara
media<-soma/3
escreval("media da turma é : " , media)
fimalgoritmo
e o segundo com dois contadores
algoritmo "corrigeprovas"
var gabarito: vetor[1..5] de caractere
resp: vetor[1..5] de caractere
nome: vetor [1..3] de caractere
nota: vetor [1..3] de real
cont, cont2: inteiro
media, soma : real
inicio
cont<-0
cont2<-1
soma<-0
escreval("cadastro de gabarito")
escreval("====================")
para cont <- 1 ate 5 faca
escreva("questão " , cont, ": ")
leia(gabarito[cont])
fimpara
limpatela
escreval("====================")
escreval("cadastro das respostas provas")
para cont2 <- 1 ate 3 faca
escreval("====================")
escreval("Aluno", cont2)
escreval("====================")
escreva("nome do aluno:")
leia(nome[cont2])
nota[cont2]<-soma
escreval("respostas dadas")
para cont <- 1 ate 5 faca
escreva("questão", cont, ": " )
leia(resp[cont])
se ( resp[cont] = gabarito[cont]) entao
soma<-soma + 2
fimse
fimpara
fimpara
escreval( "RESULTADOS")
escreval("===============")
para cont <- 1 ate 5 faca
escreval( nome[cont], nota[cont])
fimpara
media<-soma/3
escreval("media da turma é : " , media)
fimalgoritmo