Sous Turbo Pascal, vu que maxint = 32767, on aurait dû déclarer ns comme un réel, puis faire writeln ('ns : ', ns:5:0); (5 chiffres en tout, dont 0 apr`es la virgule)
Sous Turbo Pascal, vu que maxint = 32767, on aurait dû déclarer ns comme un réel, puis faire writeln ('ns : ', ns:5:0); (5 chiffres en tout, dont 0 apr`es la virgule)
9 jui 1998 · ´Epreuve d'Informatique Documents, calculettes et ordinateurs sont interdits Les exercices sont indépendants, `a réaliser en langage Pascal
En DEUG A, les premiers cours d'informatique commencent traditionnellement par des notions d'algorithmique et l'apprentissage d'un langage de programmation
Corrigé Préparé par : Zouari Lazhar Professeur d'enseignement secondaire Ecrire un programme en Pascal permet de déterminer et d'afficher le successeur
TD sur les tableaux en PASCAL (corrigé) ECE 1 Lycée Dumas jeudi 26 avril Exercice 1 Voici un programme calculant le polynome dérivé (appelé q dans le
Rang 5 4 2 1 3 Page 16 Exercices en Turbo Pascal FENNI SALAH ©® 2000 Page 16/22 Exercice 28 Ecrire un programme Pascal qui permet de remplir un
'); End; End Else Begin Writeln('Aucune valeur réelle n''est admise '); End; End ; End Exercice 2 La première correction n'
TURBO PASCAL W Exercices Corrigés Prof: FENNI Salah Lycée Chebba ©R 2006 W Turbo Pascal : Exercices Corrigés FENNI SALAH ©® 2006
pas tous traités au cours de la séance, aussi un polycopié de corrigés est remis aux élèves pour leur langage Pascal plus tard si la nécessité s'en fait sentir
Chercher “introduction langage pascal” sur Google Exercice 1 : Hello Notions : Write() et Writeln() Ecrire un programme qui affiche un mot de bienvenue,
[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(ns1
Correction 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
[PDF] Algorithmes et programmation en Pascal TD corrigés