Maior e menor número

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

algoritmo "semnome"
// Função : Ler 5 valores e dizer qual é o maior e qual é o menor
// Autor :
// Data : 26/06/2015
// Seção de Declarações 
var
 i: inteiro
 maior, menor, valor: real
inicio
// Seção de Comandos
 maior<-0
 menor<-9999999999
 
 para i de 1 ate 5 faca
 
 escreva ("Digite um valor: ")
 leia (valor)
 se (valor>maior) entao
 maior<-valor
 fimse
 
 se (valor<menor) entao
 menor<-valor
 fimse
 fimpara
 
 escreval("O maior valor digitado é: ", maior)
 escreval("O menor valor digitado é: ", menor)
fimalgoritmo