Pascal/Turbo Pascal - Duda: acceso a registros

 
Vista:

Duda: acceso a registros

Publicado por sK (4 intervenciones) el 18/07/2006 19:56:06
hola a todos tengo una duda para acceder a los registros.
Mi duda sale cuando se crea un array cn el registro es decir :
Array [1..5] Of Registro. siendo Registro = Record
nombre : tcadena10;
telefono : tcadena10;
peso: Real;
mi duda es que no se acceder a una parte del registro si ta en array, como seria? registro[2].telefono ? y para compararlas?
If registro[1].peso > registrp[2].peso then write ('la primera persona esta mas gorda') else write (' la segunda es la mas gorda!');

espero que puedan aclararmelo, asias a todos.
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

RE:Duda: acceso a registros

Publicado por Carlos Guimaraenz (265 intervenciones) el 19/07/2006 06:40:44
Hola sK!
Bueno, primero que nada, en la declaración de tipos tendrías lo siguiente:
Nota aclaratoria: los guiones los uso para mostrar la indentación...

TYPE

TCadena10 = string[10];

Registro = RECORD
----Nombre : TCadena10;
----Telefono : TCadena10;
----Peso : Real;
END;

TArreglo = ARRAY [1..5] OF Registro;

{fin de type}

VAR {declaras el array en una variable}
----MiArreglo : TArreglo;

BEGIN
{por ej. para escribir el nombre del segundo, suponiendo los datos ya cargados}
----IF ( MiArreglo[2].Peso > MiArreglo[1].Peso ) THEN
--------WRITE( MiArreglo[2].Nombre )
----ELSE
--------WRITE( MiArreglo[1].Nombre );
END.

Siempre que uses vectores, debes usar el nombre del vector junto con su índice, y así accederás al valor del elemento y a las operaciones del tipo de datos que contiene dicho vector.

Espero que te sea de utilidad. Un 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

RE:Duda: acceso a registros

Publicado por sK (4 intervenciones) el 19/07/2006 19:45:00
muchas gracias Carlos, la verdad q tenia dudas porq qedaba feo XD pero weno ya me qedo mas trankilo. Muchas gracias.
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