UNIDAD III ARREGLOS

4.- BORLAND DELPHI ARREGLOS TABLA


Un arreglo tipo tabla se define como un conjunto de datos del mismo tipo organizados en dos o mas columnas y uno o mas renglones.

Para declarar un arreglo de este tipo se usa el siguiente formato:

VAR

Nomtabla: array[1..1,1..c] of Integer;

Para procesar ( recordar solo operaciones y comparaciones) internamente todos los elementos de la tabla se ocupan dos ciclos for uno externo para controlar renglón y uno interno para controlar columna.

Solo recordar que en capturas, se deberán usar logica de control ya sea con variables globales o se pueden usar controles o componentes ocultos de tipo label o edit y en despliegue usar un ListBox como lo muestra el programa ejemplo.

Programa delphi

var
Form1: TForm1;
calif : array[1..3,1..4] of integer;
ren:integer=1;col:integer=1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
Label2.Caption:=IntToStr(ren);
Label3.Caption:=IntToStr(col);
calif[ren,col]:=StrToInt(Edit1.Text);
col := col+1;
Edit1.Text :=' ';
if (col=5) then
begin ren:=ren+1; col:=1;
end;
if (ren=4)
then
begin
ShowMessage('TABLA LLENA');
Edit1.Visible := false;
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
r:integer;c:integer;
temp:string;
begin
for r := 1 to 3 do
begin
for c:= 1 to 4 do
begin
// operaciones calif + 10 puntos
calif[r,c]:=calif[r,c]+10;
// juntando columnas para desplegar
temp:= temp + IntToStr(calif[r,c])+ ' ';
end;
// desplegando
ListBox1.Items.Add(temp);
temp:='';
end;
end;

Pantalla de salida

image316.jpg

TAREAS PROGRAMACION BORLAND DELPHI

1.- CONSTRUIR UN CUADRO QUE CONTENGA LOS COSTOS FIJOS DE CUATRO PRODUCTOS CUALESQUIERA, QUE SE PRODUCEN EN TRES PLANTAS DIFERENTES DE UNA EMPRESA MAQUILADORA.

2.- CONSTRUIR UN CUADRO QUE CONTENGA LOS INGRESOS MENSUALES POR VENTAS DURANTE LOS TRES PRIMEROS MESES DEL AÑO DE CUATRO SUCURSALES DE UNA CADENA DE AUTOREFACCIONES, AGREGAR AL FINAL UNA LISTA QUE MUESTRE LOS INGRESOS MENSUALES TOTALES POR MESES Y UNA SEGUNDA LISTA QUE MUESTRE LOS INGRESOS MENSUALES TOTALES POR SUCURSAL.

3.-CONSTRUIR UN CUADRO QUE CONTENGA LAS COMISIONES GANADAS POR TRES VENDEDORES DIFERENTES DE 5 TIPOS DE MUEBLES DE LINEA BLANCA, AGREGAR ADEMAS LISTAS DE COMISIONES TOTALES POR VENDEDORES Y POR TIPO DE MUEBLE Y LISTAS DE COMISIONES PROMEDIO POR VENDEDORES Y POR TIPO DE MUEBLES.

SUGERENCIA; PRIMERO HACER UN BOSQUEJO EN PAPEL DE COMO QUEDARAN LOS CUADROS Y LAS LISTAS EN PANTALLA.

Politica de Privacidad