Algoritmo para receber varios numeros

[Roberto Silva Santos 0]

Caro amigos estou com o seguinte algoritmo e ñ estou conseguindo resolver alguem pode me ajudar???

Tem que ser um programa que pode receber ate 85 numeros mas pode ser interrompido antes com o numero 0(zero) e como saida, mostrar ñ mostar numeros repetidos.

Há estou usando um interpretador PORTUGOL IDE 2.0

 

//Faça um programa que leia uma sequencia de no maximo 85 numeros reais, terminada

//por 0 (zero). O programa deve imprimir uma ocorrencia de cada numero. Exemplo.

ENTRADA: 1, 1, 4, 9.5, 800, 4, -3.2, 9.5, 801, 0

SAIDA: 1, 4, 9.5, 800, -3.2, 801

 

inicio

real n[85], cont

cont<-0

n<-1

enquanto (n>=1 e n>=85) faz

escrever "Digite um numero inteiro. "

ler n[cont]

fimenquanto

 

para cont de 1 ate 85 passo 1

 

//ñ sei como colocar uma ou melhor que condição para resolver o problema

 

fimse

proximo

escrever "Apresentadndo os numeros ....",

fim

[_Isis_ 202]

A condição no início está errada. Não vai ler nunca:

 

n<-1
enquanto (n>=1 e n>=85) faz

 

 

inicio
  real numeros[85];
  int index1;

  para index1 de 0 até 84 faça
   imprima "Número:"
   ler numeros[index1]
   se numeros[index1] == 0 entao
		break;  #interrompe o laço
   senao
		para index2 de 1 até index1 faça
			  se numeros[index1] == numeros[index2] entao
					numeros[index2] <- 0
			   fim se
		fim para
   fim se
fim para


 para index1 de 0 até 84 faça
   se numeros[index1] != 0 entao
		imprima numeros[index1]
   fim se
 fim para

fim

 

Colocar zero quando se lê um número repetido é sujo mas é melhor do que ficar inventando esquemas bizarros.

[Roberto Silva Santos 0]

Caro amigo "import java.Isis" descupe-me pelas minhas ignorância, mas espero um dia tb saber o suficiente do basico em programação, e agradeço pela atenção e ótimo algoritmo, mas ainda ñ rodou 100%, veja, alguns detalhe tive que alterar por ñ ser a palavra reservada do programa o qual estou usando o Portugol IDE 2.0 mas segue-se....

 

inicio

real numeros[85]

inteiro index1, index2

 

para index1 de 0 até 84 passo 1

escrever "Número:"

ler numeros[index1]

se numeros[index1] = 0 entao

 

// break #interrompe o laço esta seria a linha que agora está acusando o erro pois "break" ñ faz parte das palavras chave do programa e ai o programa da um erro de "NODO DESCONHECIDO" e se deixar o break da como "INSTRUÇÕES Ñ RECONHECIDA"

 

senao

para index2 de 1 ate index1 passo 1

se numeros[index1] = numeros[index2] entao

numeros[index2] <- 0

fimse

proximo

fimse

proximo

para index1 de 0 até 84 passo 1

se numeros[index1] =/= 0 entao

escrever "Apresentando", numeros[index1]

fimse

proximo

fim

[quitZAUMMM 18]

ñ tenho ctz + acho q no visualg o comando chama "interrompa"

[Roberto Silva Santos 0]

Quit ñ funcionou

Estou usando o PORTUGOL IDE 2.0

ou saber alguma coisa que possa resolver o codigo acima???

[quitZAUMMM 18]

veja esse pdf lah ele diz sobre o comando interrompa!

de uma olhada: http://www.nilo.pro.br/ua/Comport%20-%20Mo...o%20Menezes.pdf