//5.19 – Faça um programa que preencha dois vetores de dez posições e // faça a multiplicação dos elementos de mesmo índice, colocando // o resultado em um terceiro vetor. Mostre o vetor resultante.

algoritmo "Exercicio 5.19"


//5.19 – Faça um programa que preencha dois vetores de dez posições e
//       faça a multiplicação dos elementos de mesmo índice, colocando
//       o resultado em um terceiro vetor. Mostre o vetor resultante.

var vet_1, vet_2, vet_3:vetor[1..10]de inteiro

   i:inteiro

inicio


   // nesse bloco criamos e preenchemos com valores do primeiro vetor
   //
   para i de 1 ate 10 faca
      escreval("Preenchendo o ",i, "º campo do primeiro vetor")
      leia(vet_1[i])

   fimpara
   limpatela



   // nesse bloco criamos e preenchemos com valores do segundo vetor
   para i de 1 ate 10 faca
      escreval("Preenchendo o ",i, "º campo do segundo vetor")
      leia(vet_2[i])
   fimpara
   limpatela



   // preenchimento do terceiro vetor com
   //a multiplicação do 1º com o 2º e logo em seguida
   //efetua a leitura do mesmo mostrando na tela o resultado
   escrevaL("      RESULTADO    ")
   escreva("VETOR 1: ")
   para i:=1 ate 10 faca
      escreva(vet_1[i]:7)
   fimpara
   escreval
   escreva("VETOR 2: ")
   para i:=1 ate 10 faca
      escreva(vet_2[i]:7)
   fimpara
   escreval

   //preenchendo o terceiro vetor
   para i de 1 ate 10 faca
      vet_3[i]<- vet_1[i] * vet_2[i]
   fimpara

   escreva("VETOR 3: ")
   para i:=1 ate 10 faca
      escreva(vet_3[i]:7)
   fimpara


fimalgoritmo