[ Foro de Pascal ]

Como inicializar un campo de un registro

20-Jan-2015 19:32
Invitado (Savara)
1 Respuestas

Necesito ayuda con el siguiente ejercicio me pide lo siguiente: añadir un procedimiento (inicializa_cesta) que reciba como parámetro una variable del tipo Cesta y la inicialice poniendo el campo en_cesta a FALSE en todas las posiciones de la misma. Esto indicará que todas las posiciones están libres.

Hasta el momento hice lo siguiente

 
Const
    tammaxcesta=3;
 
Type
    producto=record
       nombre:string;
       num_unidades:integer;
       precio_unidad:real;
       en_cesta:boolean;
    end;
    Tcesta = array [0..tammaxcesta] of producto;
Var
    detalle:producto;
    cesta:Tcesta;
 


21-Jan-2015 00:24
Luis Torres (+12)

Ya tienes la variable cesta creada, esta variable es un array. Lo que tienes que hacer es recorrer el array desde 0 hasta tammaxcesta (yo te sugeriría que cambies la definición del Tcesta para que vaya de 1 a tammaxcesta y, no desde 0).
Ahora, con cada elemento del arreglo, lo que debes hacer es asignarle al campo en_cesta el valor false. Eso es todo.
Para hacértelo más sencillo, sería algo como esto:

 
Desde i<-1 hasta tammaxcesta Hacer
   cesta[i].en_cesta <- false;
Fin_Desde
 


Eso es todo. Muy sencillo, ¿no?
Saludos.






(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)