VisualgMaster

Bem vindo ao fórum visualgmaster, tudo relacionado ao visualg, tire suas dúvidas, resolva seus algoritmos.
 
InícioInício  PortalPortal  FAQFAQ  BuscarBuscar  Registrar-seRegistrar-se  MembrosMembros  GruposGrupos  Conectar-se  

Compartilhe | 
 

 Ajuda em um algoritmo de vetor e manipular valores

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
/dev/head
Novato
Novato
avatar

Masculino
Número de Mensagens : 8
Idade : 23
Localização : São Paulo
Data de inscrição : 14/09/2009

MensagemAssunto: Ajuda em um algoritmo de vetor e manipular valores   Qua Out 07, 2009 8:42 pm

tem um algoritmo que sorteia em um vetor de 15 posiçoes , usando randi que se o numero for igual ele sorteia novamente

por exemplo

var
vetor : vetor [0..15] de inteiro
i : inteiro
inicio

para i de 0 ate 15 faca
vetor[i]<- randi(60)
fimpara

se o valor do vetor for igual ao algum ele sorteia novamente


na parte do sortear novamente eu nao consigo ja quebrei a cabeça 3 dias tentando fazer isso por favor me ajudem

obrigado


/Dev/Head
Voltar ao Topo Ir em baixo
Ver perfil do usuário http://devhead.4shared.com
/dev/head
Novato
Novato
avatar

Masculino
Número de Mensagens : 8
Idade : 23
Localização : São Paulo
Data de inscrição : 14/09/2009

MensagemAssunto: Re: Ajuda em um algoritmo de vetor e manipular valores   Qui Out 22, 2009 6:52 pm

opa
vim responder minha propria pergunta XD

algoritmo "Nao repet"
// Função : ordenar o vetor de forma crescente e nao repitir valores
// Autor : /Dev/Head
// Data : 15/10/2009
// Seção de Declarações
var
veto1:vetor[1..16]de inteiro
valormovel, valorfixo,num, auxiliar,y :inteiro
verify:logico
inicio
ESCREVAL
para num de 1 ate 16 faca
veto1[num]<- randi(60)
fimpara

para y de 1 ate 16 faca
repita
verify<-falso
para valorfixo de y ate 1 passo -1 faca
enquanto (veto1[valorfixo]= veto1[y]) e (y <> valorfixo) faca
se(veto1[valorfixo]= veto1[y])entao
verify<-verdadeiro
veto1[y]<-randi(60)
senao
verify<-falso
fimse
fimenquanto
fimpara
ate (verify=falso)
fimpara
para valorfixo de 1 ate 16 faca
para valormovel de valorfixo+1 ate 16 faca
se(veto1[valormovel]< veto1[valorfixo])entao
auxiliar<-veto1[valorfixo]
veto1[valorfixo]<-veto1[valormovel]
veto1[valormovel]<-auxiliar
fimse
fimpara
escreva(veto1[valorfixo])
fimpara
escreval
escrevAL
fimalgoritmo
Voltar ao Topo Ir em baixo
Ver perfil do usuário http://devhead.4shared.com
 
Ajuda em um algoritmo de vetor e manipular valores
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» ajuda com Pac-man
» Preciso da ajuda na resolução deste exercicios não resolvidos de Algoritmo! Socorro
» [Vetor] Retro Stars
» Meu vetor - Desenho
» Ajuda com ranks

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
VisualgMaster :: VisualgMaster :: Pedidos de algoritmos-
Ir para: