concursoMega-sena

[GeorgeMaxwell 0]

Tô com um execício da faculdade para construir um algoritmo que determine quantos ganhadores da mega-sena obteve exito, no visualg. A questa é a seguinte: Conseidere que você foi designado para descobrir quantos ganhadores houve para um determinado concurso da mega-sena. Para isso, você dispões de um vetor com os resultados do concurso e um conjunto de vetores com as apostas realizadas. Para efeito de simplicação, considere apenas apostas de seis numeros. Pede-se: escreva um algoritmo que leia o vetor de resultados e compare com os "N" vetores de apostas, imprima quantos apostadores acertaram 6, 5 e 4 números.

 

Minha dúvida é: como vou escreve "N" vetores

[quitZAUMMM 18]

hummmm..

mostre seus avanços e dificuldades ;D

 

[]s

[GeorgeMaxwell 0]

A principipio construir o algoritmo que segue mas ainda falta criar uma condição para determinar se já saiu algum número sorteado.

algoritmo "mega-sena"
var
a,b:vetor [1..6] de inteiro
i,j,contg,qt_numeros,qt_ganhadores4,qt_ganhadores5,qt_ganhadores6,total,qtapostadores:inteiro
inicio
escreval ("Informe a quantidade de apostadores!")
leia(qtapostadores)
escreval ("Informe os numeros soteardos!")
para i de 1 ate 6 faca
   leia (a[i])
fimpara

contg <- 0
qt_ganhadores4 <- 0
qt_ganhadores5 <- 0
qt_ganhadores6 <- 0

repita

   qt_numeros <- 0

   escreval ("Informe os numeros do apostador número ",contg)
   para j de 1 ate 6 faca
      leia (b[j])
   fimpara
   para i de 1 ate 6 faca
      para j de 1 ate 6 faca
         se (a[i])=(b[j]) entao
            qt_numeros <- qt_numeros+1
         fimse
      fimpara
   fimpara

   se (qt_numeros = 4) entao
      qt_ganhadores4 <- qt_ganhadores4+1
   senao
      se (qt_numeros = 5) entao
         qt_ganhadores5 <- qt_ganhadores5+1
      senao
         se (qt_numeros = 6) entao
            qt_ganhadores6 <- qt_ganhadores6+1
         fimse
      fimse
   fimse

   contg <- contg+1
ate (contg = qtapostadores)


total <- (qt_ganhadores4 + qt_ganhadores5 + qt_ganhadores6)

escreval ("Quantidade de ganhadores que acertaram 4 numeros na mega-sena é: ",qt_ganhadores4)
escreval ("Quantidade de ganhadores que acertaram 5 numeros na mega-sena é: ",qt_ganhadores5)
escreval ("Quantidade de ganhadores que acertaram 6 numeros na mega-sena é: ",qt_ganhadores6)
escreval ("Total de ganhadores da mega-sena: ",total)

fimalgoritmo

[quitZAUMMM 18]

Então tente desenvolver e se tiver duvidas posta ae ;D

 

[]s

[GeorgeMaxwell 0]

Foi o melhor que conseguir fazer!!

algoritmo "mega-sena"
var
a,b:vetor [1..6] de inteiro
i,j,k,contg,qt_numeros,qt_ganhadores4,qt_ganhadores5,qt_ganhadores6,total,qtapostadores:inteiro
inicio
escreval ("Informe a quantidade de apostadores!")
leia(qtapostadores)
escreval ("Informe os numeros soteardos!")
para i de 1 ate 6 faca
   leia (a[i])
fimpara
para i de 1 ate 6 faca
   para k de (i+1) ate 6 faca
      se (a[i] = a[k]) entao
         escreval ("Informe novamente o numero na posição ",k," pois não pode haver repetição!")
         leia (a[i])
      fimse
   fimpara
fimpara


contg <- 0
qt_ganhadores4 <- 0
qt_ganhadores5 <- 0
qt_ganhadores6 <- 0

repita

   qt_numeros <- 0

   escreval ("Informe os numeros do apostador número ",contg)
   para j de 1 ate 6 faca
      leia (b[j])
   fimpara

   para j de 1 ate 6 faca
      para k de (j+1) ate 6 faca
         se (b[j] = b[k]) entao
            escreval ("Informe novamente o numero na posição ",k," do apostador ",contg," pois não pode haver repetição!")
            leia (b[j])
         fimse
      fimpara
   fimpara



   para i de 1 ate 6 faca
      para j de 1 ate 6 faca
         se (a[i])=(b[j]) entao
            qt_numeros <- qt_numeros+1
         fimse
      fimpara
   fimpara

   se (qt_numeros = 4) entao
      qt_ganhadores4 <- qt_ganhadores4+1
   senao
      se (qt_numeros = 5) entao
         qt_ganhadores5 <- qt_ganhadores5+1
      senao
         se (qt_numeros = 6) entao
            qt_ganhadores6 <- qt_ganhadores6+1
         fimse
      fimse
   fimse

   contg <- contg+1
ate (contg = qtapostadores)


total <- (qt_ganhadores4 + qt_ganhadores5 + qt_ganhadores6)

escreval ("Quantidade de ganhadores que acertaram 4 numeros na mega-sena é: ",qt_ganhadores4)
escreval ("Quantidade de ganhadores que acertaram 5 numeros na mega-sena é: ",qt_ganhadores5)
escreval ("Quantidade de ganhadores que acertaram 6 numeros na mega-sena é: ",qt_ganhadores6)
escreval ("Total de ganhadores da mega-sena: ",total)

fimalgoritmo

[quitZAUMMM 18]

Então seguinte amigo, n tenho como compilar então me diz, oq falta?

quais entradas e saidas esperadas?

 

[]s