AGRADECIMENTO...

Pessoal, Gostaria de pedir desculpas aqueles que deixam perguntas/comentários/elogios/críticas e ainda não foram respondidos.

Aproveito a oportunidade para informar a todos que devido a correria do dia a dia não conclui o curso de BSI, por isso meus conhecimentos são limitados rsrsrs...

Ainda não retirei o blog do ar porque tem ajudado a diversos estudantes, principalmente os iniciantes.

As vezes, quando o trabalho me permite, ainda arrisco tentar resolver algumas questões rs... mas para não deixar esse blog parar no tempo, o ESTUDANTE que quiser enviar a resolução de alguma questão (código próprio) para o meu e-mail, terei o prazer de posta-la neste blog e será mantido a autoria.

Desde já agradeço a todos pelas visitas e desejo bons estudos.

Thiago Campos
(srthiago@hotmail.com)

sexta-feira, 24 de agosto de 2012

Exemplo de Algoritmo do Visual G usando Vetores

Leia um vetor A de 10 elementos. Construa um vetor B do mesmo tipo que recebe os valores de A na ordem inversa. O primeiro elemento de A será último de B, o segundo de A será o penúltimo de B e assim por diante. Escreva A e B.

Algoritmo (Código do Visual G)
algoritmo "semnome"
// Autor : Thiago Campos
// Data : 23/08/2012
// Seção de Declarações
var
A: vetor[1..10] de Inteiro
B: vetor[1..10] de Inteiro
VetA, VetB: Literal
j, i: Inteiro

inicio
// Seção de Comandos
   Para j <- 1 ate 10 faca
        Escreva("Informe os numeros inteiro:")
        Leia(A[j])
   fimpara
   i <- 1
   Para j <- 9 ate 1 passo -1 faca
        B[j] <- A[i]
        i<-i+1
   fimpara
//Guarda os elementos dos vetores
   Para i <- 1 ate 10 faca
        Escreva(B[i])
   fimpara
fimalgoritmo

Nenhum comentário:

Postar um comentário