virtualword
Te invitamos a registrarte para poder acceder a todo el contenido gratuito que esta comunidad provee.

Saludos Wink

Lección 019: Registros

Ir abajo

Lección 019: Registros

Mensaje  Kyshuo Ayame el Dom Oct 13, 2013 7:07 am

Ejercicio 1: Determinen cuáles de las siguientes definiciones de registro son válidas:
a)
Código:
TYPE
   estado = RECORD
      nombre : ARRAY[1..30] OF CHAR;
      edad : 0..120;
      sexo : (Fem, Masc);
b)
Código:
TYPE
   ejemplo = RECORD
      prueba : 0..100;
      final : 'A'..'F';
     orden : 1..100
   END;
c)
Código:
TYPE
   franco = RECORD
      prueba : 0..100;
      examen : 0..10;
      prueba : 0..100
   END;
d)
Código:
TYPE
   califs = RECORD
      nombre,
      direccion : ARRAY[1..30] OF CHAR;
      prueba,
      examen : 0..100;
      tipoest : (flojo, trabajador, puntual, impuntual)
   END;
------------------------------------------------------------------------------------

Ejercicio 2:

Dado un registro para guardar datos de estudiantes tal como el que ya vimos, teniendo en mente también el tipo Grados

Código:

TYPE
     Grados= (primero, segundo, tercero, cuarto, quinto, sexto);

     Estudiante= RECORD
        Nombre: String;
        Edad, Documento: Integer;
        Grado: Grados;
    END;

sabiendo que cada campo del registro es una variable, podemos ingresar datos al mismo desde la entrada estándar. Por ejemplo, si tenemos una variable Est1 del tipo Estudiante, podríamos leer el nombre del estudiante desde la entrada estándar de la siguiente manera:

Código:
Read(Est1.Nombre);
Del mismo modo podemos leer los demás datos excepto Grados ya que es un enumerado y debemos pensar un poco más.

Teniendo los tipos anteriores y la siguiente declaración de un nuevo tipo:

Código:
BaseEstuidantes= Array[1..10] Of Estudiante;
y una variable

Código:
Est: BaseEstudiantes;
se pide crear un programa en Pascal que lea los datos de la entrada estándar para los 10 estudiantes que se pueden guardar en Est, y luego permita buscar un estudiante según su Documento y muestre todos sus datos.

Este ejercicio lo he pensado para que apliquen todo lo que acabo de enseñar más alguna cosita de antes.

Mucha suerte, y tengan en mente que estaré para ayudarles.
Saludos.

=========================================================================

Navegación:
avatar
Kyshuo Ayame
Admin

Mensajes : 105
Fecha de inscripción : 14/11/2012
Edad : 29

Ver perfil de usuario http://virtualworld.foroargentina.net

Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.