	Algo & programmation
	Matière informatique

Bac scientifiques

Exercices du livre scolaire (corrigés)

Formatage d'affichage

Exercice 8 : page 69

Préciser le résultat obtenu à la sortie d'un programme par les séquences d'instruc-

tions suivantes :

VAR var1, var2, var3, var4, var5 : REAL;

où :

var1 vaut 1.2

var2 vaut 0.00089

var3 vaut 45

var4 vaut 10095.095

var5 vaut 2.7182818281

Séquences d'instructions :

1) WRITE(var1 : 8 : 4);
2) WRITE(var2 : 8 : 4);
3) WRITE(var3 : 4 : 1);
4) WRITE(var4 : 3 : 1);
5) WRITE(var5 : 3 : 1);

6) WRITE(var1 : 6 : 4);
7) WRITE(var2 : 10 : 6);
8) WRITE(var3 : 10 : 6);
9) WRITE(var4 : 7 : 5);
10) WRITE(var5 : 10 : 4);

Corrigé :

1- :

var1=1.2

var2 = 0.00089

var3 = 45

var4 = 10095.095

var5 = 2.7182818281

	1	2	3	4	5	6	7	8	9	10	11	12
1) WRITE(var1 : 8 : 4);			1	.	2	0	0	0
2) WRITE(var2 : 8 : 4);			0	.	0	0	0	9
3) WRITE(var3 : 4 : 1);	4	5	.	0
4) WRITE(var4 : 3 : 1);	1	0	0	9	5	.	1
5) WRITE(var5 : 3 : 1);	2	.	7
6) WRITE(var1 : 6 : 4);	1	.	2	0	0	0
7) WRITE(var2 : 10 : 6);			0	.	0	0	0	8	9	0
8) WRITE(var3 : 10 : 6);		4	5	.	0	0	0	0	0	0
9) WRITE(var4 : 7 : 5);	1	0	0	9	5	.	0	9	5	0	0
10) WRITE(var5 : 10 : 4);					2	.	1	7	8	3

Exercice 9 : page 69

Ecrire un programme en Pascal permettant de lire 2 nombres entiers positifs infé-

rieurs à 999 et affiche à l'écran la multiplication et la division comme suit :

Corrigé :

1- :

program ex9page69;

uses wincrt;

var

¤ a,b:word;

begin

¤ writeln('Donner 2 entiers positifs <999 :');

¤ write('a=');readln(a);

¤ write('b=');readln(b);

¤ writeln;

¤ writeln(a:6);

¤ writeln(' x ',b:3);

¤ writeln('........');

¤ writeln('= ',a*b:4);

¤ writeln;writeln;

¤ writeln(a:3,' : ',b);

¤ writeln(a mod b :3,' :....');

¤ writeln(': ':6,a div b);

¤ writeln(': ':6 );

end.

Date d'ajout de la page: 10/11/2013 Dernière mise à jour de la page: 10/11/2013