Exercices divers sur les fichiers, les enregistrements

Exercice 1:

Un compte en banque concerne une personne
spécifiée par son nom, un numéro de compte (un entier),
et un montant (réel).

Déclarez un enregistrement pour cette structure.

Exercice 2:

Soit la structure Info
constituée par le nom (chaîne de 30 caractères
maximum), le numéro de téléphone (10 caractères
maximum), le numéro de carte bancaire (entier non
signé).

Ecrivez un programme
qui saisit puis affiche les enregistrements pour 3 personnes.

Exercice 3:

Ecrire un algorithme qui lit deux nombres
complexes C1 et C2 et qui affiche en
suite leur somme et leur produit.

On utilisera les formules de calcul suivantes :

· (a + bi) + (c + di)
= (a + c) + (b + d)i

· (a + bi) * (c + di) = (ac – bd) + (ad + bc)i

Exercice 4:

Créer un tableau Tab_Emp qui
contiendra les informations sur les 50 employés d’une
entreprise (Matricule, Nom, Salaire, Etat_civil), le
remplir puis afficher le nombre d’employés dont le salaire est compris
entre 500 et 800D.

Exercice 5:

Ecrivez un programme nommé BIBLIO
permettant de représenter les informations d’une référence
bibliographique : le titre du livre, le nom de l’auteur, le nom de
l’éditeur, l’année de publication et le nombre de pages.

Exemple de livre:

La chartreuse de Parme de Stendhal édité par
Gallimard en 1987 et qui compte 683 pages.

Ce programme permet :

- La saisie des références (au minimum 2 et au
maximum 150) dans un tableau,

-
La saisie d’une année

- La
recherche et l’affichage de tous les livres qui ont été publiés cette
année.




Exercice 6:

Ecrire un algorithme qui génère un fichier
intitulé ²nombres.txt² contenant des nombres entiers fournis par
l’utilisateur puis affiche uniquement les nombres pairs.

Exercice 7:

En utilisant le fichier généré dans l’exercice
précédent, écrivez un programme permettant de réaliser les actions
offertes par le menu suivant :

1- déterminer le nombre d’éléments du fichier

2- Renommer le fichier ²nombres.txt² en ²valeur.doc²

3- Supprimer
les éléments du fichier se trouvant après une position P
donnée

4- Supprimer le
fichier du disque.

Exercice
8:

Ecrire un
algorithme permettant de :

-
Créer et remplir un fichier "FP"
qui contient les informations sur 1es personnels d’une entreprise
(matricule, nom, prénom, grade, salaire).

- Afficher la liste des employés de cette
entreprise dont le salaire est compris en 500 et 800
D.

- vérifier
l’existence d’un employé dans FP à partir de son
matricule.

Exercice
9:

Ecrire un
algorithme permettant de :

· Créer et remplir un fichier "Fich_Notes"
qui contient les notes de 30 élèves

·
Copier les notes dans un tableau Tab_Notes

· Trier le tableau Tab_Notes
dans l’ordre croissant

· Copier les notes triées du tableau vers le
fichier Fich_Notes.

Exercice 10: (concaténation de deux fichiers)

Soient F et G
deux fichiers dont les enregistrements ont la même structure (entier,
réel, enregistrement, …). Ecrire une analyse puis déduire un algorithme
qui permet de fusionner les fichiers F et G en un seul fichier.




Exercice 11 :

A l'aide d'un éditeur de textes, créer un fichier
intitulé NOMBRES.TXT qui contient une liste de nombres
entiers. Dans le fichier, chaque nombre doit être suivi par un retour à
la ligne.

1.
Ecrire un algorithme puis sa traduction en pascal
d’un programme qui affiche les nombres du fichier, leur somme et leur
moyenne.

2.
Ecrire une procédure intitulée tri permettant de
trier le fichier NOMBRES.TXT dans un deuxième fichier
intitulé NOMBRES_TRIES.TXT.

Exercice 12:

Ecrire une analyse puis un algorithme d’un
programme pascal qui permet de lire le chemin d’accès d’un fichier
texte, calcule et affiche le nombre de lignes, le nombre de caractères
dans le fichier ainsi que le nombre de caractère par ligne.

svpppppppppppppppppp admin, c urgent, est ce qu'il y a la correction d'ex 7 et 9

NON.

Il faut proposer des solutions personnelles et participer au forum pour avoir les corrections.

Exercice 1:

Un compte en banque concerne une personne
spécifiée par son nom, un numéro de compte (un entier),
et un montant (réel).

Déclarez un enregistrement pour cette structure.

la correction:
Programme Compte-Banque
Type
tcompte= enregistrement
Nom: caractère
Num: entier
Montant: réel
finenreg
est ce bien correct?

je me demande de quelque exercies rèsolue conserne a ihm

admin svp j'ai besoin d'avoirs les corrections des exercices 2 et 4 c'est urgent merci d'avance

EXO 2 :
Algorithme saisie_affich;
type Info = enregistrement
nom: chaine[30];
num_tel, num_c_b: entier;
fin;
var T: tableau[1..3] de Info;
i: entier;
debut
pour i allant de 1 à 3 faire
| avec T[i] faire
| lire (nom, num_tel, num_c_b);
| finavec;
finpour;
pour i allant de 1 à 3 faire
| avec T[i] faire
| ecrire( nom, num_tel, num_c_b);
| finavec;
finpour;
fin.

EXO 4
algorithme entreprise;
type employe = enregistrement
nom, etat_c: chaine[30];
matricule: entier;
salair: reel;
fin;
tab: tableau[1..50] de employe;
var Tab_Emp: tab;
i,nb: entier;
debut
nb<-- 0;
pour i allant de 1 à 50 faire
avec (Tab_Emp[i]) faire
lire(nom, matricule, etat_c, salair);
Si ((salair>=500) et (salair <=800)) alors
nb<-- nb + 1;
finavec;
finpour;
ecrire('Le nombre d"employés ayant le salair entre 500 et 800 est : ', nb);
fin.

EXO 9 :
Algorithme fichier_notes;
var Tab_Notes: tableau[1..30] de reel;
Fich_Notes: fichier de reel;
x: reel; i,j: entier;
debut
Assigner( Fich_Notes, 'nom_phisique');
Ouvrir( Fich_Notes, 'Ecriture');
pour i allant de 1 à 30 faire
Ecrire('Note de l"etudiant numero ',i,' :');
lire(x);
Tab_Notes[i]<-- x;
Ecrire( Fich_Notes, x);
finpour;
Fermer(Fich_Notes);
pour i allant de 1 à 29 faire
pour j allant de i+1 à 30 faire
Si (Tab_Notes[i]>Tab_Notes[j]) faire
-Tab_Notes[i]<-- Tab_Notes[i]+Tab_Notes[j];
-Tab_Notes[j]<-- Tab_Notes[i]-Tab_Notes[j];
-Tab_Notes[i]<--Tab_Notes[i]-Tab_Notes[j];
finSi
finpour;
finpour;
Ouvrir( Fich_Notes, 'Ecriture');
pour i allant de 1 à 30 faire
Ecrire(Fich_Notes, Tab_Notes[i]);
finpour;
Fermer(Fich_Notes);
fin.

S.V.P Quelqu'un sait comment renommer un fichier ... merci "exo 7"