algoritmo Q4 portugol

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

Var
A: vetor [1..8] de real
i,x,y:inteiro
soma:real
Inicio
para i de 1 até 8 faca
escreva ("digite o ", i, "º valor" ,i,":")
leia (A [i])
fimpara
escreva ("digite a primeira posicao:")
leia (x)
escreva ("digite a segunda posicao:")
leia (y)
soma <- A[x] + A[y];
escreva ("A soma é:", soma)
Fimalgoritmo