Algorithmes et programmation en Pascal TD corrigés PDF

EXERCICES – ALGORITHME SECONDE. Exercice 5.1. Ecrire un algorithme qui demande à l'utilisateur un nombre compris entre 1 et 3 corrigé - retour au cours.

Algorithmique avec Algobox

Exercice : Demander 5 notes calculer la moyenne et attribuer la mention Concevoir un algorithme avec AlgoBox qui calcule le nombre d'arrivée en ...

LATEX pour le prof de maths !

11 janv. 2021 Création d'exercices avec des nombres aléatoires . ... 15.4 Avec Algobox . ... tions dynamiques en cours à l'aide de la classe Beamer.

algorithmique seconde

II.1 Une traduction algorithmique de l'énoncé . Un peu d'exercice pour retrouver la forme . ... Programmer l'algorithme sur Algobox.

algorithmique.pdf

Il s'agit d'afficher la valeur d'une variable. Syntaxe : « afficher a ». Syntaxe des instructions. Algorithme papier algobox. Calculatrice TI. Calculatrice

livre-scratch.pdf

Avec Scratch la programmation devient un jeu et votre ordinateur un compagnon. À la découverte des algorithmes. Un algorithme est une suite d'instructions

Diapositive 1

15 févr. 2013 EXERCICES ALGORITHME 1. Mr KHATORY. (GIM 1° A). 2. Ecrire un algorithme permettant de résoudre une équation du second degré.

Mathématiques

classe de seconde de poursuivre l'entraînement des élèves dans ce domaine par la rencontrée dans un cours de mathématiques sauf dans les exercices de ...

Correction du TD 2 - Les tableaux 1 Exercice 1

Ecrire les algorithmes permettant : 1. Le calcul du nombre d'occurences d'un élément donné dans un tableau. Nb_occurences (T: Tableau d'entier N: entier)

Algorithmes et programmation en Pascal TD corrigés

Taper le programme Portrait vu en cours; le modifier pour qu'il demande de Faire un programme qui lit t et qui affiche le nombre de secondes ns écoulées.

AlgorithmesetprogrammationenPascal

FacultedesSciencesdeLuminyEdouardThiel

TDcorriges

Deug1MassMA

Modulede75heures

1997a2004

Tabledesmatieres

1Expressionsetaectations4

1.1Typed'uneexpression4

1.2Anneebissextile5

1.3Boulangerie5

1.4LogiquedeBoole5

1.5SupplementspourleTP6

2Intervallesetenregistrements7

2.1Heures7

2.2SupplementspourleTP10

3Procedures11

3.1MinetMax11

3.2

Echangedansl'ordrecroissant12

3.3Passaged'enregistrements13

3.4SupplementspourleTP14

4Bouclesetfonctions15

4.1Fonctionsnumeriques15

4.2Lectureauclavier16

4.3Intervallesdetemps17

4.4SupplementspourleTP18

5Tableauxetindices19

5.1LeprogrammeAppaLet19

6Tableaux,recordetstring23

6.1LeprogrammeRendezV23

6.2Cryptage25

7Detectiondemots27

7.1LeprogrammeColEcran27

8Fichierstexte31

8.1LeprogrammeMinusCol31

9Recherchedansunchier35

9.1Recherchedemots35

9.2LeprogrammeNuMots37

TDDeug1MassMA,1997a20043

10Tris39

10.1Triparpermutation39

10.2Triabullesoptimise40

10.3SupplementspourleTP42

1.Expressionsetaectations

1.1Typed'uneexpression

Rappel

Tabledesprioritesclasseesparordre

decroissant,lesoperateurssurunem^eme ligneayantuneprioriteegale(onevaluealors degaucheadroite).()fonction()primaire +-notunaire */divmodandmultiplicatif +-oradditif =<><<=>=>relation pasbienformees.Exemple: round(2:6|{z} reel+1|{z} entier| {z} reel3.6) {z} entier4>4|{z} entier=3|{z} entier| {z} reel1.33.. {z} booleentrue

1.2-53+4(2-5)(3+4)2-(5*3+4)

2.12/312div311div3div211mod3+5.2

3.1.02+3-4round(26.3)-15/3(50<3*8)

4.falseornotfalseandtrue(12>24)+(2+4=12)

5.(37-3>=14)-'a'+3pred('b')>'k'12>3>4

6.3.5+7>4>falsenot(12<>3*16.8/4)andtrue

7.3cos(8.0/(17-(34)-5))

Correction

1.entier9entier21entier17

2.reel4:0entier4entier1reel7:2

3.reel1:0reel8:0booleenfalse

4.booleentrueerreur:bool+bool

6.booleentruebooleenfaux

7.erreur:divisionpar0

TDDeug1MassMA,1997a20045

1.2Anneebissextile

Ecrireb:=l'expression.

Correction

(1)!(3):(xandy)or(xandz)=xand(yorz).

1.3Boulangerie

TD TP estouverte.

Correction

b:=(h>=7)and(h<=13)and(j<>1)or (h>=16)and(h<=20)and(j>1); !Re echirchezsoiaucasoulesminutessontxees.

1.4LogiquedeBoole

Simplierlesexpressions:

Correction

xory=yorx(idempourand){10} :=(x<7);{5} q:=not(aand(notaorb))orb; :=true;{7}

Remarque:(x)y)s'ecritnotxory

1.5SupplementspourleTP

1)CodesASCII

2)Erreurs

3)Portrait

TDDeug1MassMA,1997a20047

2.Intervallesetenregistrements

2.1Heures

enregistrementtemps_t.

Correction

TYPEheure_t=0..23;minute_t=0..59;

s:seconde_t;End;

2)Soitt1ett2deuxtemps_t.

Correction

PROGRAMtp_egaux;TYPE{cf1)}

VARt1,t2:temps_t;egal:boolean;

writeln('Egalite:',egal);END.

3)Modierleprogrammepourqu'ildisesit1 a)Avecuneexpressionbooleenne. b)Avecdesifthenelse.
Correction
a)Ondeclareinf:boolean.
Onpeutencorereduirel'expression:
nement. inf:=false;if(t1.h4)Soittuntemps_t.

depuis0:0:0.

Correction

virgule).

PROGRAMnb_sec;TYPE{cf1)}

VARt:temps_t;ns:integer;

writeln('ns:',ns);END.

TDDeug1MassMA,1997a20049

passantparlaconversionensecondes.

Correction

PROGRAMtp_comp;TYPE

{cf1)}VARt1,t2:temps_t; ns1,ns2:integer;BEGIN{Lecturet1ett2...} ns2:=t2.h*3600+t2.m*60+t2.s; if(ns1Correction

Onplaceleresultatdanst3:temps_t.

ecrire:

2.2SupplementspourleTP

1)Procedures

2)Programmemystere

Quefaitceprogramme?

PROGRAMabyz;VARd:char;

BEGINread(d);

END.

TDDeug1MassMA,1997a200411

3.Procedures

3.1MinetMax

1)ProcedureMinde2entiers.

2)ProcedureMaxde2entiers.

Correction

BEGINifa END;
BEGINifa>bthensup:=aelsesup:=b;
END;
BEGINMin(x,y,p);Max(x,y,g);
END;
4)PROGRAMexo1;

VARu,v,pp,pg:integer;{varglobales}
{iciproceduresMin,MaxetMinMax} BEGIN writeln('min',pp,'max',pg);END. 3.2
Echangedansl'ordrecroissant
estabc.Ecrireplusieursversions.
Correction

BEGINifa>bthenbegint:=a;a:=b;b:=t;end;
END;
PROGRAMTri1;

VARu,v:real;{Mettreicilaprocedure}BEGIN
END.
Onseposelaquestion:varoupasvar?
apres. .Avecunvar:aetbsontdesaliasdeuetv.
2)PROCEDUREEchange3(vara,b,c:real);BEGIN
END;
Ilyad'autressolutionspossibles.Exemple:

Echange2(a,b);{onmetleplusgranddansb}

TDDeug1MassMA,1997a200413

3.3Passaged'enregistrements
parametres. 1) detsouslaformeh:m:ssansretouralaligne. 2) leschampsdet. 3) ecouleesdepuis0:0:0.
Correction

PROGRAMtemps;
TYPE heure_t=0..23;minute_t=0..59; seconde_t=0..59;temps_t=Recordh:heure_t; m:minute_t;s:seconde_t;End;
1)PROCEDUREecriture(t:temps_t);BEGIN
write(t.h,':',t.m,':',t.s);END; readln(t.h,t.m,t.s);END; END;
4)VARt1,t2:temps_t;
n1,n2:integer;c:char; BEGIN ifn13.4SupplementspourleTP

1)Programmemystere

Laballeestsousquelgobelet?

PROGRAMballe;

TYPEgobelet_t=recordballe:boolean;

abra(g1,g2);cad(g2,g3);abra(g3,g1); END.

TDDeug1MassMA,1997a200415

4.Bouclesetfonctions

4.1Fonctionsnumeriques

1)Factorielle

Faireunefonctionfacto(n)quirenvoien!.

2)Puissance

Faireunefonctionpuiss(x,n)quirenvoiexn.

3)Exponentielleex'1+x

1+x22!+x33!++xnn!

appelauxfonctionsfactoetpuiss.

Correction

END; {Lafonctionestjusteegalementpourn=0. {Onpeutaussicommencerlefora2. puiss:=r;END; {00n'estmathematiquementpasdeni. expn:=r;END; deplusenpluslents.

4.2Lectureauclavier

1)Compterdescaracteres

2)CompterlesL

Correction

c:char;BEGINres:=0;{init} END;

3)CompterlesLEUniquementenTP

Correction

c,d:char;BEGINres:=0;{init} whilec<>CFindo end; readln; nb_couple:=res; END;

TDDeug1MassMA,1997a200417

4.3Intervallesdetemps

Soitletypetemps_tdeniaux2.

1) periodedetemps. 2) depuis0:0:0. 3) etrenvoieleresultatsousformed'untemps_t. 4) etdeconvertir.

Correction

1)TYPEheure_t=0..23;

h:heure_t;m:minute_t;s:seconde_t;

End;inter_t=Recorddebut,fin:temps_t;

End;quotesdbs_dbs45.pdfusesText_45

[PDF] Algorithmes et programmation en Pascal TD corrigés

AlgorithmesetprogrammationenPascal

FacultedesSciencesdeLuminyEdouardThiel

TDcorriges

Deug1MassMA

Modulede75heures

1997a2004

Tabledesmatieres

1Expressionsetaectations4

1.1Typed'uneexpression4

1.2Anneebissextile5

1.3Boulangerie5

1.4LogiquedeBoole5

1.5SupplementspourleTP6

2Intervallesetenregistrements7

2.1Heures7

2.2SupplementspourleTP10

3Procedures11

3.1MinetMax11

Echangedansl'ordrecroissant12

3.3Passaged'enregistrements13

3.4SupplementspourleTP14

4Bouclesetfonctions15

4.1Fonctionsnumeriques15

4.2Lectureauclavier16

4.3Intervallesdetemps17

4.4SupplementspourleTP18

5Tableauxetindices19

5.1LeprogrammeAppaLet19

6Tableaux,recordetstring23

6.1LeprogrammeRendezV23

6.2Cryptage25

7Detectiondemots27

7.1LeprogrammeColEcran27

8Fichierstexte31

8.1LeprogrammeMinusCol31

9Recherchedansunchier35

9.1Recherchedemots35

9.2LeprogrammeNuMots37

TDDeug1MassMA,1997a20043

10Tris39

10.1Triparpermutation39

10.2Triabullesoptimise40

10.3SupplementspourleTP42

1.Expressionsetaectations

1.1Typed'uneexpression

Rappel

Tabledesprioritesclasseesparordre

1.2-5*3+4(2-5)*(3+4)2-(5*3+4)

2.12/312div311div3div211mod3+5.2

3.1.0*2+3-4round(2*6.3)-15/3(50<3*8)

4.falseornotfalseandtrue(12>24)+(2+4=12)

5.(37-3>=14)-'a'+3pred('b')>'k'12>3>4

6.3.5+7>4>falsenot(12<>3*16.8/4)andtrue

7.3*cos(8.0/(17-(3*4)-5))

Correction

1.entier9entier21entier17

2.reel4:0entier4entier1reel7:2

3.reel1:0reel8:0booleenfalse

4.booleentrueerreur:bool+bool

6.booleentruebooleenfaux

7.erreur:divisionpar0

TDDeug1MassMA,1997a20045

1.2Anneebissextile

Ecrireb:=l'expression.

Correction

1.3Boulangerie

Correction

1.4LogiquedeBoole

Simplierlesexpressions:

Correction

Remarque:(x)y)s'ecritnotxory

1.5SupplementspourleTP

1)CodesASCII

2)Erreurs

3)Portrait

TDDeug1MassMA,1997a20047

2.Intervallesetenregistrements

2.1Heures

Correction

1.2-53+4(2-5)(3+4)2-(5*3+4)

3.1.02+3-4round(26.3)-15/3(50<3*8)

7.3cos(8.0/(17-(34)-5))

3)Modierleprogrammepourqu'ildisesit1 a)Avecuneexpressionbooleenne. b)Avecdesifthenelse.
Correction
a)Ondeclareinf:boolean.
Onpeutencorereduirel'expression:
nement. inf:=false;if(t1.h4)Soittuntemps_t.