El Projecte | Sobre nosaltres | Contribuir | Donacions | Llicència
HOME Els meus cursos Finalitzats
◄ Anterior
◄

Operacions amb Fitxers Binari

Següent ►
►

En aquest tema, aprendrem com treballar amb fitxers binaris en Fortran. Els fitxers binaris són útils per emmagatzemar dades en un format compacte i eficient, especialment quan es treballa amb grans volums de dades numèriques. A diferència dels fitxers de text, els fitxers binaris no són llegibles per humans, però permeten una lectura i escriptura més ràpides.

Continguts

  1. Introducció als Fitxers Binaris
  2. Obrir i Tancar Fitxers Binaris
  3. Llegir de Fitxers Binaris
  4. Escriure a Fitxers Binaris
  5. Exercicis Pràctics

  1. Introducció als Fitxers Binaris

Els fitxers binaris emmagatzemen dades en format binari, és a dir, en una seqüència de bits. Això permet una representació més compacta de les dades i una manipulació més ràpida en comparació amb els fitxers de text.

Avantatges dels Fitxers Binaris

  • Eficiència: Menor espai d'emmagatzematge i accés més ràpid.
  • Precisió: Emmagatzematge exacte de dades numèriques sense errors d'arrodoniment.

Desavantatges dels Fitxers Binaris

  • No llegible per humans: Les dades no es poden llegir directament.
  • Portabilitat: Pot haver-hi problemes de compatibilitat entre diferents sistemes.

  1. Obrir i Tancar Fitxers Binaris

Per treballar amb fitxers binaris en Fortran, utilitzem les instruccions OPEN i CLOSE.

Obrir un Fitxer Binari

OPEN(unit=10, file='dades.bin', form='unformatted', status='unknown')
  • unit: Unitat lògica per referir-se al fitxer.
  • file: Nom del fitxer.
  • form='unformatted': Indica que el fitxer és binari.
  • status='unknown': El fitxer pot existir o no.

Tancar un Fitxer Binari

CLOSE(unit=10)

  1. Llegir de Fitxers Binaris

Per llegir dades d'un fitxer binari, utilitzem la instrucció READ.

Exemple de Lectura

PROGRAM llegir_fitxer_binari
  IMPLICIT NONE
  INTEGER :: unit, i
  REAL :: dades(10)

  unit = 10
  OPEN(unit=unit, file='dades.bin', form='unformatted', status='old')

  READ(unit) dades

  PRINT *, 'Dades llegides:'
  DO i = 1, 10
    PRINT *, dades(i)
  END DO

  CLOSE(unit)
END PROGRAM llegir_fitxer_binari

  1. Escriure a Fitxers Binaris

Per escriure dades a un fitxer binari, utilitzem la instrucció WRITE.

Exemple d'Escriptura

PROGRAM escriure_fitxer_binari
  IMPLICIT NONE
  INTEGER :: unit, i
  REAL :: dades(10)

  unit = 10
  OPEN(unit=unit, file='dades.bin', form='unformatted', status='replace')

  DO i = 1, 10
    dades(i) = i * 1.0
  END DO

  WRITE(unit) dades

  CLOSE(unit)
END PROGRAM escriure_fitxer_binari

  1. Exercicis Pràctics

Exercici 1: Escriure i Llegir un Fitxer Binari

  1. Escriu un programa que generi un array de 20 números enters i els escrigui a un fitxer binari.
  2. Escriu un segon programa que llegeixi els números del fitxer binari i els imprimeixi a la pantalla.

Solució

Programa d'Escriptura:

PROGRAM escriure_enters_binari
  IMPLICIT NONE
  INTEGER :: unit, i
  INTEGER :: dades(20)

  unit = 10
  OPEN(unit=unit, file='enters.bin', form='unformatted', status='replace')

  DO i = 1, 20
    dades(i) = i
  END DO

  WRITE(unit) dades

  CLOSE(unit)
END PROGRAM escriure_enters_binari

Programa de Lectura:

PROGRAM llegir_enters_binari
  IMPLICIT NONE
  INTEGER :: unit, i
  INTEGER :: dades(20)

  unit = 10
  OPEN(unit=unit, file='enters.bin', form='unformatted', status='old')

  READ(unit) dades

  PRINT *, 'Dades llegides:'
  DO i = 1, 20
    PRINT *, dades(i)
  END DO

  CLOSE(unit)
END PROGRAM llegir_enters_binari

Conclusió

En aquesta secció, hem après com treballar amb fitxers binaris en Fortran. Hem vist com obrir, tancar, llegir i escriure fitxers binaris, així com els avantatges i desavantatges d'utilitzar aquest tipus de fitxers. Els exercicis pràctics proporcionats t'ajudaran a consolidar aquests conceptes. En el següent mòdul, explorarem temes avançats com els mòduls i les interfícies.

◄ Anterior
◄
Següent ►
►
El Projecte | Sobre nosaltres | Contribuir | Donacions | Llicència
© Copyright 2024. Tots els drets reservats