Comparar valores de um vetor

[Atomus 0]

Galera, alguém tem ai na manga um algoritmo otimizado para verificar se todas os valores de um determinado vetor são iguais?

[quitZAUMMM 18]

faz um loop: ñ é otimizado + veja: <um vetor com 10 elementos>

x<-0;
para i de 0 até 9 faça 
	para j de 0 até 9 faça
		vetor[i] = vetor[j]
		x <- x+1;
	fim_para
fim_para
se (x = 45) então
	escreva("Vetor com todos valores iguais");
senão
	escreva("Vetor não tem todos valores iguais");
fim_se

[scorpio 7]

eu faria assim

continua <- verdadeiro
x <- 1
igual <-verdadeiro
enquanto(continua = verdadeiro OU x<=9)
  se(vetor[0]<>vetor[x])entao 
	continua<-falso
	igual <- falso
  fim_se 
x<-x+1
repita
se(igual = verdadeiro)entao
  escreva("todos os elementos são iguais")
senao
  escreve("vetor com elementos diferentes")
fim_se

só com um laço de repetição. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

edit:

tava com um erro na lógica ali, ele iria fazer eternamente, só adicionei x<=9 na condição do enquanto

[quitZAUMMM 18]

concordo com sua lógica scorpion, pois c o primeiro for igual aos demais, nem precisa comparar + nd, pois tds seram iguais!!

 

boa lógica http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[Pantoja 5]

Otimas soluções parabens.

 

e realmente com uma variavel de controle booleana é melhor.

 

 

Abraços