Vetor Soma Parcial #visualg #algoritmo

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

Algoritmo "Vetor-Soma-Parcial"
// Disciplina : Lógica de Programação e Algoritmos
// Professor :
// Autor(a) : Vinicius
// Data atual : 30/09/2016
//------------------------------------------------------------------------+
// Descrição : Algoritmo recebe 10 valores.
//
// Armazena em um vetor do tipo inteiro.
//
// Efetua a soma parcial a cada valor inserido e armazena
// cada soma em uma posição de um vetor.
//
// Exibe vetor com os valores e seus índices respectivos.
//
// Exibe vetor com os valores da soma parcial.
//------------------------------------------------------------------------+
Var
// Seção de Declarações das variáveis
i , start , stop : inteiro
numero : inteiro
vtor : vetor [1..5] de inteiro
vtor_soma : vetor [1..5] de inteiro
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
//------------------------------------------------------------------------+
// Passando valores iniciais para as variáveis
//------------------------------------------------------------------------+
i <- 0
start <- 1
stop <- 5
numero <- 0
//------------------------------------------------------------------------+
// Apresentação
//------------------------------------------------------------------------+
escreval ("")
escreval (" Sowtware recebe 10 valores. Armazena em um VETOR do tipo INTEIRO.")
escreval ("")
escreval (" Efetua a soma parcial a cada valor inserido e armazena cada soma")
escreval (" em uma posição de um vetor.")
escreval ("")
escreval (" Exibe vetor com os valores e seus índices respectivos.")
escreval ("")
escreval (" Exibe vetor com os valores da soma parcial.")
escreval ("")
//------------------------------------------------------------------------+
// Laço de repetição
//------------------------------------------------------------------------+
para i de start ate stop faca
 //---------------------------------------------------------------------+
 // Entrada de dados
 //---------------------------------------------------------------------+
 escreval ("")
 escreva (" v", i, " = ")
 leia (numero)
 vtor[i] <- numero
 //---------------------------------------------------------------------+
 // Efetua a soma parcial a cada valor inserido
 //---------------------------------------------------------------------+
 se (i > start) entao
 vtor_soma[i] <- vtor_soma[i-1] + vtor[i]
 senao
 vtor_soma[i] <- vtor[i]
 fimse
fimpara
//------------------------------------------------------------------------+
// Limpando a tela
//------------------------------------------------------------------------+
limpatela
//------------------------------------------------------------------------+
// Saída de dados
//------------------------------------------------------------------------+
escreval ("")
escreval ("Resultado")
escreval ("")
escreval ("")
//------------------------------------------------------------------------+
// Exibe os valores do VETOR -> vtor
//------------------------------------------------------------------------+
escreva ("[VETOR]")
escreval ("")
escreval ("")
//------------------------------------------------------------------------+
// Laço de repetição
//------------------------------------------------------------------------+
para i de start ate stop faca
 escreva ("[", vtor[i], " ] ")
fimpara
//------------------------------------------------------------------------+
// Pulando linhas
//------------------------------------------------------------------------+
escreval ("")
escreval ("")
escreval ("")
//------------------------------------------------------------------------+
// Exibe os valores do VETOR -> vtor_soma
//------------------------------------------------------------------------+
escreva ("[SOMA PARCIAL]")
escreval ("")
escreval ("")
//------------------------------------------------------------------------+
// Laço de repetição
//------------------------------------------------------------------------+
para i de start ate stop faca
 escreva ("[", vtor_soma[i], " ] ")
fimpara
//------------------------------------------------------------------------+
// Pulando linhas
//------------------------------------------------------------------------+
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
escreval ("")
FimAlgoritmo