[PDF] Algorithmes et programmation en Pascal



Previous PDF Next PDF







Cours et exercices corrigés en Pascal

1 4 Exercices 1 5 Solutions 2 Les langages, introduction au Pascal 12 2 1 Introduction aux langages 2 2 Structure générale des programmes Pascal 2 3 Types, variables, opérateurs 2 4 L'instruction d'affectation 2 5 Les instructions d'Entrées-Sorties 2 6 Exercices 2 7 Solutions



Algorithmes et programmation en Pascal

2 Algorithmes et programmation en Pascal Edouard Thiel Table des mati eres 1 Expressions et a ectations 4 1 1 Type d’une expression 4 1 2 Ann ee bissextile 5 1 3 Boulangerie 5 1 4 Logique de Boole 5 1 5 Suppl emen ts pour le TP 6 2 Intervalles et enregistrements 7 2 1 Heures 7 2 2 Suppl emen ts pour le TP 10 3 Proc edures 11 3 1 Min et Max 11



Série d’exercice Corrigé Préparé par : Zouari Lazhar

Ecrire un programme en Pascal qui permet d’extraire puis afficher les chiffres de centaine, dizaine et unité d’un entier composé de trois chiffres Exercices N° 06 Ecrire un programme en Pascal qui permet de calculer et d’afficher la distance entre deux points dont les coordonnées sont données



Exercices en langage C++: 150 exercices corrigés (Noire

150 exercices corrigés pour maîtriser la langage C++ Complément idéal de Programmer en langage C++, du même auteur, cet ouvrage vous propose 150 exercices corrigés et commentés pour mieux assimiler la syntaxe de base du C++ (types et opérateurs, instructions de contrôle, fonctions, tableaux, pointeurs ) et les concepts objet du langage



SUJET + CORRIGE

UE J1MI2013 : Algorithmes et Programmes DS Terminal, Ann ee 2012/2013 i (2 points) Ecrire un algorithme rangSelection(T,r) fortement inspir e de l’algorithme ou du





LANGAGE C Exercices corrigés 1

LANGAGE C Exercices corrigés 1 TP1 Exercice 1 : Ecrire un programme qui lit un caractère au clavier et affiche le caractère ainsi que son code



TD 5 : Chaînes de caractères - cedriccnamfr

TD 5 : Chaînes de caractères Programmation en C (LC4) Semaine du 25 février 2008 1 Chaînes de caractères On av utiliser les fonctions de la bibliothèque standard destinées à la manipulation des chaînes de

[PDF] langage pascal informatique

[PDF] langage pascal pour debutant

[PDF] langage pascal pour debutant pdf

[PDF] langage pascal site du zero

[PDF] langage poétique définition

[PDF] langage programmation facebook

[PDF] langage python en seconde

[PDF] Langage soutenu - URGENT

[PDF] langage soutenu dictionnaire

[PDF] langage soutenu mots

[PDF] language de la continuité- limite

[PDF] Language HTML

[PDF] Language sql exercice de maison

[PDF] Language tools

[PDF] langue allemande dans le monde

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-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

TD

Ecrireb:=l'expression.

TP

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

TD

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:

quotesdbs_dbs3.pdfusesText_6