Trabalho 1

1-Faça um algoritmo que leia um vetor S[20] e uma variável A. A seguir, mostre o produto da variável escalar A pelo vetor.

algoritmo "Produto Escalar" var S: vetor [1..20] de inteiro i, A: inteiro inicio i <- 1 repita leia (S[i]) i <- i + 1 ate (i > 20) leia (A) i <- 1 repita escreva (S[i] * A) i <- i + 1 ate (i > 20) fimalgoritmo 2-Escrever um algoritmo que lê um vetor G(13) que é o gabarito de um teste de loteria esportiva, contendo os valores 1(coluna 1), 2(coluna 2) e 3(coluna do meio). Ler, a seguir, para cada apostador, o número de seu cartão e um vetor Resposta R(13). Verificar para cada apostador o número de acertos e escrever o número do apostador e seu número de acertos. Se tiver 13 acertos, acrescentar a mensagem: "GANHADOR, PARABENS". algoritmo "loteria" var g: vetor [1..13] de inteiro r: vetor [1..13] de inteiro i,acertos :inteiro

inicio
// ler gabarito para i de 1 ate 13 faca g[i] <- 0 enquanto (g[i] < 1 ou g[i] > 3) faca escreval ("Digite o gabarito da linha: ", i) leia (g[i]) fimenquanto fimpara

escreval ("Digite o numero do cartao: ") leia (numcartao) para i de 1 ate 13 faca r[i] <- 0 enquanto (r[i] < 1 ou r[i] > 3) faca escreval ("Digite a opção marcada para a linha: ", i) leia (r[i]) fimenquanto fimpara

acertos <- 0 para i de 1 ate 13 faca se (r[i] = g[i]) entao acertos <- acertos + 1 fimse fimpara

se (acertos = 13) entao escreval ("GANHADOR, PARABENS") senao escreval ("Você teve ", acertos, " acertos") fimse fimalgoritmo