You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
23) Fazer um algoritmo em PORTUGOL que:<br />
a) Leia o valor inteiro de n (n ≤ 1000) e os n valores de uma variável composta A de<br />
valores numéricos, ordenados de forma crescente;<br />
b) Determine e imprima, para cada número que se repete no conjunto, a quantidade de<br />
vezes em que ele aparece repetido;<br />
c) Elimine os elementos repetidos, formando um novo conjunto;<br />
d) Imprima o conjunto obtido no item c.<br />
algoritmo L4P23;<br />
var<br />
inteiro: C, J, N, NVEZES;<br />
real: ANTERIOR, VETORIG[1..1000], VETSRP[1..1000];<br />
início<br />
imprima("Digite o valor de n: ");<br />
leia(N);<br />
imprima("Digite os numeros em ordem crescente: ");<br />
para C de 1 até N faça<br />
leia(VETORIG[C]);<br />
fim-para<br />
ANTERIOR