Exercício de vetores visualg

[ET Bilu]

"Crie um algoritmo que leia um vetor de 30 números inteiros e gere um segundo vetor cujas posições pares são o dobro do vetor original e as ímpares o triplo." 

 

Foi isso que fiz até agora, e o visualg apontou erro de sintaxe. Alguém ajuda.

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 15/10/2016
// Seção de Declarações
var
v,v2:vetor[1..30] de inteiro
i,tam:inteiro
inicio
tam<-30
para i de 1 ate tam faca
   leia(v[i])
fimpara
para i de 1 ate tam faca
   se (v[i] mod 2)=0 então
      v[i]*2<-v2[i]
   senao
      v[i]*3<-v2[i]
   fimse
fimpara
fimalgoritmo

 

[devair1010]

@ET Bilu    Seu Código Está Bom, Só Tem Um Pequeno Erro Ali No Se, No Caso A

Posição No Vetor É A Variável i, Então É Preciso Ver Se i É Par Ou Ímpar, Experimente 
Colocar Assim:

   se i mod 2=0 então
     v2[i]:=v[i]*2
   senao
     v2[i]:=v[i]*3
   fimse

E Também Ali Na Hora Do Leia Seria Bom Colocar Uma Informação Para Que O 
Usuário Saiba O Que Fazer, Então Ali Antes Do Leia Coloque Isso:

escreval("Digite Um Número E Tecle Enter")

E No Final Pode-se Mostrar Os Valores Nos Vetores .

 

[ET Bilu]

Ih, continua dando erro, Eu até tinha substituído por i anteriormente, mas dá erro de sintaxe.@devair1010

[devair1010]

@ET Bilu   Se Você Colocar Do Jeito Que Eu Postei Acredito Que Vai Funcionar Certo

Pelo Menos Aqui Eu Testei E Está Funcionando.

  Veja Que As Variáveis Estão Ao Contrário, Entâo  É v2 na posição i que recebe v na

posição i multiplicado por 2 ou por 3.

   se i mod 2 = 0 então
      v2[i] := v[i]*2
   senao
      v2[i] := v[i]*3
   fimse

 

[ET Bilu]

Ah, ta certo. Valeu!@devair1010