Liandra Giovanna

Tenho que fazer um vetor de 10 posições e mostrar o maior e o menor número desse vetor. Estou tendo dificuldade com o menor número, sempre dá zero. Abaixo meu algoritmo:

var
i:inteiro
   x:vetor[1..10] de inteiro
   menor:inteiro
   maior:inteiro
inicio
     escreval ("digite 10 números")
  para i de 1 ate 10 faca
    escreval ("digite o",i, "ºnúmero")
leia(x)
  fimpara
 para i de 1 ate 10 faca
 se (maior < x) então
 maior <- x
 fimse
 se (menor > x) então
 menor -> x
 fimse
 fimpara
 escreva (menor)
 escreva (maior)
fimalgoritmo

Obrigada, já consegui fazer.

@devair1010 Já consegui fazer, mas obrigada.

Alguém sabe como fazer esse algoritmo que divide dois números apenas usando os símbolos da soma e da subtração?