Pascal/Turbo Pascal - eliminar los valores repetidos en un arrray

   
Vista:

eliminar los valores repetidos en un arrray

Publicado por marios (58 intervenciones) el 13/04/2014 14:40:38
hola buen dia, agradecido siempre con Ramon en quien siempre encuentro execelentes solcuiones de las cuales tambien se aprende.
queria preguntar por una parte de un programa que estoy realizando y que no se como hacer la verdad sea.

se trata de eliminar los numeros repetidos en un vector ,porejemplo
si el vector es:
1 2 3 1 5 6 1 7 34 90
el resultado seria: 2 3 5 6 7 34 90

el profesor dice que debe hacerse de dos formas distintas, una de ellas obligatoria usando un array auxiliar. muchas gracias ramon.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Pascal/Turbo Pascal
- Código fuente de Pascal/Turbo Pascal
- Cursos de Pascal/Turbo Pascal
- Temas de Pascal/Turbo Pascal
- Chat de Pascal/Turbo Pascal
información
Códigos de Pascal/Turbo Pascal
- Calculadora
- Radar
- Juego del Tetris

eliminar los valores repetidos en un arrray

Publicado por ramon (2072 intervenciones) el 14/04/2014 01:40:37
Mira El array seria;
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
numero : array[1..10] of integer;
 nuevo : array[1..10] of integer;
  t, p, c, n : integer;
 
  for c := 1 to 10 do
   for n := 10 downto c + 1 do
   begin
        if numero[c] = numero[n] then
        begin
        numero[c] := 0;
        numero[n] := 0;
        end;
    end;
     t := 1;
     for p := 1 to 10 do
      if numero[p] > 0 then
      begin
       nuevo[t] := numero[p];
        t := t + 1;
       end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar