registro introduccion y array de record

Vista previa del material en texto

CLASE Record y Array Of Record
Registro: 
Un registro (record) es un tipo de datos estructurado, que formado por un conjunto de datos que pueden ser del mismo tipo o de distintos tipos. A estos componentes se los denominan campos. Cada campo posee un nombre, que se declara en el tipo registro.
Ejemplo: 
Tipo 
 persona = Record
	apellido : String[30]
	nombre : String[60]
	DNI: entero
	domicilio: string[50]
 fin
 producto = Record
	descripcion: string[70]
	unidaddemedida: string[20]
	stock: entero
	precio: real
 fin
Var datopersona : persona
 articulo : producto
apellido 
nombre
DNI
domicilio
Registro
datopersona
campos
Rodriguez
Natalia
37878451
Alvear 850
datos
Ejemplo: 
Definir un tipo de dato registro que represente los datos de un alumnos.
Un alumnos tiene sus datos personales (Apellido, Nombre, DNI , Domicilio, Fecha Nacimiento, numero de legajo)
Tipo
 alumno = Registro
	apellido : String[30]
	nombre : String[60]
	DNI: entero
	domicilio: string[50]
	fechanacimiento: string[10]
	legajo: string[10]
 fin
Var regalumno: alumno
 
Hacer un procedimiento de carga de registro
Programa EjemploReg
Var v_alumno : alumno
 Proceso CargaReg ( var alu: alumno)
 Inicio
	Leer( alu.apellido)
	Leer( alu.nombre)
	Leer( alu.DNI)
	Leer( alu.domicilio)
	Leer( alu.fechanacimiento)
	Leer( alu.legajo)
 fin
 
Inicio
 CargaRreg(v_alumno)
 Mostrar (v_alumno.apellido)
 Mostrar (v_alumno.nombre) 
 Mostrar (v_alumno.domicilio)
 CargaRreg(v_alumno)
 Mostrar (v_alumno.apellido)
Fin
( González ) 
( Carlos ) 
( 45622455 ) 
( Belgrano 350 ) 
( 11/02/2001 ) 
( 9950/2020 ) 
 González 
 Carlos 
 Belgrano 350 
( Kuyesen ) 
( Jorge ) 
( 13585790 ) 
( Lote 52 ) 
( 11/09/1958 ) 
( 155/2001 ) 
 Kuyesen 
Proceso Carga: 
Proceso CargaVecAlumno( Var vec_alu : array [1..1000] de alumno )
 var i : entero
 
Inicio
 i:=1
 MIENTRAS i<= 1000 HACER 
 Leer( vec_alu[i].apellido)
	Leer ( vec_alu[i].nombre)
	Leer( vec_alu[i].DNI)
 Leer ( vec_alu[i].domicilio)
 Leer( vec_alu[i].fechanacimiento)
	Leer( vec_alu[i]. legajo)
 i:= i + 1
fin 
 
 
1
2
3
( Kuyesen ) 
Apellido Kuyesen 
( Jorge ) 
Nombre Jorge 
( 13585790 ) 
DNI 13585790 
( Lote 52 ) 
Domicilio Lote 52 
( 11/09/1958 ) 
Fecha nac 11/09/1958 
( 155/2001 ) 
Legajo 155/2001 
( Benitez ) 
Apellido Benitez 
( alberto ) 
Nombre Alberto 
( 39818813 ) 
DNI 39818813 
( B. Andresito Mo C4 ) 
Domicilio B Andresito Mo C4 
( 05/07/1996 ) 
Fecha nac 05/07/1996 
( 1558/2015 ) 
Legajo 1558/2015 
Proceso Visualizar: 
Proceso VisualizaVecAlumno( Var vec_alu : array [1..1000] de alumno )
 var i : entero
 
Inicio
 i:=1
 MIENTRAS i<= 1000 HACER 
 Mostrar ( “Apellido”, vec_alu[i].apellido)
	 Mostrar ( “Nombre”, vec_alu[i].nombre)
	 Mostrar ( “DNI”, vec_alu[i].DNI)
 Mostrar ( “Domicilio”, vec_alu[i].domicilio)
 Mostrar ( “Fecha Nacimineto”, vec_alu[i].fechanacimiento)
	 Mostrar ( “Legajo”, vec_alu[i]. legajo)
 i:= i + 1
fin 
 
Apellido Kuyesen 
Nombre Jorge 
DNI 13585790 
Domicilio Lote 52 
Fecha nacimiento 11/09/1958 
Legajo 155/2001 
Apellido Benitez 
Nombre Alberto 
DNI 39818813 
Domicilio B Andresito Mo C4 
Fecha nac 05/07/1996 
Legajo 1558/2015 
Array de Registro: 
Se tiene información de un supermercado con las ventas que realizan día a día en cada sucursal de una ciudad. 
La información que se tiene es la siguiente: Cod Sucursal, fecha de venta, importe vendido y finaliza con cod de suc 999. (Suponer que esta ordenado por cod_suc)
Hacer un proceso que informe por sucursal la suma total vendida en el mes.
Tipo sucursal = registro
 	 Cod_Suc: Entero
	 fec_ven: string
	 imp_ven: real 
Var
 empresa : array [1..1000] de sucursal 
 
 
1
2
3
Cod_Suc: 01
Cod_Suc: 01
Cod_Suc: 01
Fec_ven: 01/10/20
Fec_ven: 02/10/20
Fec_ven: 03/10/20
Imp_ven : 100000
Imp_ven : 150000
Imp_ven : 500000
Cod_Suc: 02
Fec_ven: 01/10/20
Imp_ven : 300000
Cod_Suc: 02
Fec_ven: 02/10/20
Imp_ven : 200000
Cod_Suc: 999
4
5
6
image1.png