Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Var
- pontos: inteiro
- golfeito: inteiro
- golsofrido: inteiro
- empate: inteiro
- saldogols: inteiro
- mediagol: real
- i: inteiro
- vitoria, impate: inteiro
- Inicio
- vitoria <- 3
- impate <- 1
- pontos <- 0
- golfeito <- 0
- golsofrido <- 0
- mediagol <- 0
- para i <- 1 até 12 faça
- se golfeito > golsofrido = vitoria
- senao impate
- escreva("Jogo 1: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- vitoria
- fimse
- fimpara
- escreva("Jogo 2: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 3: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 4: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 5: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 6: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 7: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 8: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 9: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 10: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 11: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreva("Jogo 12: ")
- leia (golfeito)
- leia (golsofrido)
- pontos <- pontos + golfeito
- escreval("mediagol: ", golfeito*12/2)
- escreval("pontos : ", vitoria+impate)
- escreval("Saldo : ", pontos+golsofrido)
- Fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement