// Autor: Prof. Tiago Eugenio de Melo // Data: 15.05.2013 // Contato: tiagodemelo@gmail.com algoritmo "Maior diferença" var v: vetor [1..6] de real i: inteiro dif, difMaior: real inicio para i de 1 ate 6 faca leia (v[i]) fimpara difMaior <- 0 para i de 1 ate 5 faca dif <- v[i] - v[i+1] se (dif < 0) entao dif <- dif * (-1) fimse se (dif > difMaior) entao difMaior <- dif fimse fimpara escreval ("A maior diferença no vetor é ", difMaior) fimalgoritmo