Exercicio 3.39 ou 4.39.. da lista de repetição

//3.39 Faça um programa que leia dez conjuntos de dois
//valores, o primeiro representando o número do aluno
//e o segundo representando a sua altura em centímetros.
//Encontre o aluno mais alto e o mais baixo.
//Mostre o número do aluno mais alto e o número do aluno
//mais baixo, junto com suas alturas.
Algoritmo "algoritmo 3.39"
// Disciplina   : ALGORITMOS
// Professor    : ANGELO DA CUNHA SÁ
// Descrição   : Aqui você descreve o que o programa faz! (função)
// Autor(a)    : Nome do(a) aluno(a)
// Data atual  : 19/10/2016
Var
   // Seção de Declarações das variáveis
   I:inteiro
   alunos, Alunomaior,alunomenor,Maior,Menor,Altura:real

Inicio
    //Le 10 alunos
   ESCREVAL("DIGITE O Numero do ALUNO")
   Leia(Alunos)
   ESCREVAL("DIGITE A ALTURA DO ALUNO")
   Leia(Altura)
   Maior := altura
   Menor := altura
   alunomaior:=alunos
   alunomenor:=alunos

   para i:= 1 ate 9 faca
      ESCREVAL("DIGITE O Numero do ALUNO")
      Leia(Alunos)
      ESCREVAL("DIGITE A ALTURA DO ALUNO")
      Leia(Altura)
      Se Altura > maior entao
         Maior := altura
         alunomaior:=alunos
      fimse
      se Altura < menor entao
         Menor := altura
         alunomenor:=alunos
      FimSe
   FimPara
   //Mostra Maior
   ESCREVA("O Maior aluno é o que tem o numero ",Alunomaior)
   escreval(" sua altura é: ", maior)
   //Mostra Menor
   ESCREVA("O Menor aluno é o que tem o numero ",Alunomenor)
   escreval(" sua altura é: ", menor)
Fimalgoritmo