soma e produto vetores

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "semnome"
// Função :
// Autor :
// Data : 21/10/2016
// Seção de Declarações
var
i: inteiro
vet1,vet2,res1,res2: vetor [1..10] de inteiro
inicio
// Seção de Comandos
aleatorio on
aleatorio -50,50
para i de 1 ate 10 faca
 leia (vet1[i])
fimpara
escreval
aleatorio off
aleatorio on
aleatorio -80,80
para i de 1 ate 10 faca
 leia (vet2[i])
fimpara
aleatorio off
limpatela
para i de 1 ate 10 faca
 res1[i] <- (vet1[i]-vet2[i])
 res2[i] <- (vet1[i]*vet2[i])
fimpara
escreval ("Subtração dos vetores")
escreval
escreval ("vet1 - vet2 = Res ")
para i de 1 ate 10 faca
 escreval (vet1[i]:3," - ",vet2[i]:3," = ",res1[i]:3)
fimpara
escreval
escreval ("Produto entre os vetores")
escreval
escreval ("vet1 x vet2 = Res ")
para i de 1 ate 10 faca
 escreval (vet1[i]:3," x ",vet2[i]:3," = ",res2[i]:3)
fimpara
fimalgoritmo