Pascal/Turbo Pascal - editar arreglo

   
Vista:

editar arreglo

Publicado por daniel (13 intervenciones) el 03/12/2015 15:10:53
buenas amigo necesito un procedimiento o una funcion que edite un arreglo. Gracias espero por su pronta ayuda
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
Imágen de perfil de emanuel

editar arreglo

Publicado por emanuel (6 intervenciones) el 03/12/2015 15:12:43
Buenos dias, a que te referis con buscar.
Que sea interactiva y que te pida los datos que ingresadndo por teclado
por ejemplo cantidad de elementos y los vayas cargando y por ultimo lo imprimas por pantalla?
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

editar arreglo

Publicado por daniel (13 intervenciones) el 03/12/2015 15:21:43
por lo menos el programa que ando haciendo yo ingreso los valores y me muestra lo que ingrese pero lo que se quiere, es que esos valores yo los pueda modificar por ejemplo, yo elijo la posición del arreglo que deseo modificar.
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
Imágen de perfil de emanuel

editar arreglo

Publicado por emanuel (6 intervenciones) el 03/12/2015 15:34:18
ta bien
lo que tenes qeu hacer es si elegis la posicion, lo que tenes que hacer es recorrer con un while hasta esa posicion y modificas el valor ingresado.
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

editar arreglo

Publicado por daniel (13 intervenciones) el 03/12/2015 15:35:45
la pregunta es como seria mas o menos ese procedimiento necesito por lo menos un ejemplo para tener la noción de como hacerlo
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
Imágen de perfil de emanuel

editar arreglo

Publicado por emanuel (6 intervenciones) el 03/12/2015 15:53:33
Seria algo asi
disculpame si hay algun error de sintaxis
por favo probalo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
Program Array01;
 
var
    datos: array[1..5] of integer;
    i: integer;
	j:integer;
	m:integer;
	o:integer;
 
 
begin
    for i := 1 to 5 do
    begin
        write('Deme el dato ',i,': ');
        readLn(datos[i]);
    end;
 
    write ('Ingrese posicion del dato que necesita modificar')
 
    readln(j);
	if(j> 5) then
	  write ('Ingrese posicion del dato que necesita modificar')
 
      readln(j);
	  write ('Ingrese el valor que quiere cambiar')
	  readlon(o);
	else
 
	  m:=0;
	  while(m <j) do
	      m:= m +1;
 
	  datos[m]:=o;
 
     write('El nuevo array quedaria asi');
 
      for i := 1 to 5 do
        write(datos[i], ' ');
 
 
 
 
 
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

editar arreglo

Publicado por daniel (13 intervenciones) el 03/12/2015 16:08:47
en el else hay error
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
Imágen de perfil de emanuel

editar arreglo

Publicado por emanuel (6 intervenciones) el 03/12/2015 16:18:53
en qeu parte?
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

editar arreglo

Publicado por daniel (13 intervenciones) el 03/12/2015 16:46:11
le quite el else y corrio a la perfect estoy tratando de pasarlo como un procedimiento pero es un poco dificil
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
Imágen de perfil de emanuel

editar arreglo

Publicado por emanuel (6 intervenciones) el 03/12/2015 18:56:41
dale si necesitas algo mandame un mail a geneman1405@gmail.com
abrazo
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