informatika-2022-23: Azterketa: 2023ko maiatzaren deialdia

2023(e)ko maiatzaren 24(a), asteazkena

Azterketa: 2023ko maiatzaren deialdia

2023ko Maiatzaren deialdiko programa: Kromoen bilduma

Ariketari lotutako informazioa:

2023-05-24_KromoenBilduma.pdf (ariketaren enuntziatua)
2023-05-24_KromoenBilduma.pas programa (adibidez C:\GurePrograma karpetan koka daiteke)

Datu-fitxategiak sortzeko programak:

DatuFitxategiaSortu.pas bezero-programa (bilduma21 unitatearekin, bilduma30 unitatearekin edo bilduma39 unitatearekin batera karpeta berean kokatu, adibidez C:\GurePrograma karpetan)
bilduma21.pas unitatearen iturburu-kodea (DatuFitxategiaSortu.pas bezero-programarekin batera karpeta berean kokatu, adibidez C:\GurePrograma karpetan), edo...
bilduma30.pas unitatearen iturburu-kodea (DatuFitxategiaSortu.pas bezero-programarekin batera karpeta berean kokatu, adibidez C:\GurePrograma karpetan), edo...
bilduma39.pas unitatearen iturburu-kodea (DatuFitxategiaSortu.pas bezero-programarekin batera karpeta berean kokatu, adibidez C:\GurePrograma karpetan)

Datu-fitxategiak:

KROMOAK.DAT datu-fitxategiak 21, 30 edo 39 elementu izan ditzake (bilduma21.pas unitatearekin, bilduma30.pas unitatearekin edo bilduma39.pas unitatearekin sortu bada)
JOKALARIAK.DAT datu-fitxategiak 340 elementu ditu eta bezero-programarekin batera karpeta berean kokatu (adibidez, C:\GurePrograma karpetan)

2023-05-24_KromoenBilduma.pas programak neurri desberdineko datu-fitxategiak prozesa ditzake, adibidez 21, 30 edo 39 elementuko datu-fitxategiak (gehienez 340 elementu izan ditzake datu-fitxategiak). Ondorioz, programa honetan erabiltzen den arraya zehazteko luzera logikoa adierazten duen aldagaia beharko da, jakinik arrayaren muga 340 elementukoa dela:

   program Kromoak_2023ko_maiatza;

   uses
      crt, sysutils;
   
   const
      iMAX = 340;                  // enuntziatuan 471
      sBIDEA = 'C:\KromoBilduma\';
   
   type
      taiBilduma = array[1..iMAX] of integer;

Hau da bilduma21 izeneko unitatearen interfazea (bilduma30 unitatearen eta bilduma39 unitatearen interfazeak berdinak dira, eta aldea BildumarenFitxategiaSortu prozeduran dago):

(* -------------------------- bilduma21 unitatearen interfazea ------------------ *)

const
   sBIDEA = 'C:\KromoBilduma\';

type
   integer = smallint;     (* INTEGER-entzat 2 byte erabiltzera behartzen da *)
   
   tsKate25  = string[25];
   tsKate199 = string[199];

   trdBalioak = record
                   iDefentsan,
                   iKontrolean,
                   iErasoan,
                   iGuztira: integer;
                end;

   trdKromoa = record
                  iZenbakia : integer;
                  sIzena    : tsKate25;
                  sTokia,
                  sTaldea   : tsKate25;
                  rdBalioak : trdBalioak;
                  iZenbatAle: integer;
               end;

   tfrdBilduma = file of trdKromoa;

   procedure BildumarenFitxategiaSortu(sFitxIzenBilduma: tsKate199);

   procedure BildumarenFitxategiaIkusi(sFitxIzenBilduma: tsKate199);
   
(* ---------------------------- interfazearen amaiera -------------------------- *)

2023ko Maiatzaren deialdiko teoria

Galderei dagozkien programak: