funcao ordenados (vetor(real) v): int
    int i
    para i em (0..tamanho(v)-2):
        se v[i] > v[i+1]:
            retorne i+1
    retorne -1

int i, posicao
vetor(real, 10) v

para i em (0..9):
    leia v[i]

posicao <- ordenados(v)

se (posicao == -1):
    mostre "Os números estão ordenados"
senao:
    mostre "Os números não estão ordenados; veja o elemento na posição", posicao