|
|
|
|
|
|
Donner les contenus des variables I et L et CH1 :
I=.............
L=.............
CH1=.............
b- STR(123, X) ;
Y := X + ‘4’ ;
VAL(Y, Z, E) ;
Donner les contenus des variables X, Y, Z et E :
X=.........
Y=.........
Z=.........
E=.........
c- CH1 := ‘DEVOIR DE CONTROLE N2’ ;
CH2 := ‘INFO ’ ;
INSERT(CH2,CH1,7) ;
DELETE(CH1, 13,8) ;
DELETE(CH1, 13,4) ;
Donner les contenus des variables CH1et CH2 :
CH1=................
CH2=................
EXERCICE N°2 : (3pts)
Compléter le programme PASCAL suivant :
PROGRAM TEST ;
TYPE
TAB ...........................[......................] OF
integer ;
VAR
T : ......................;
CH1 : ......................[ ......................] ;
...................... : STRING ;
...................... :integer;
BEGIN
Readln(CH1) ;
FOR I ......................TO 20 DO
Write(UPCASE(......................)) ;
......................:= COPY(CH1, 5, 6) ;
Write(CH2);
FOR I ......................TO 20 DO
Write(T[i]) ;
END.
EXERCICE N°3 : (12pts)
Ecrire un algorithme REN_TRI qui permet de :
· Lire un entier N ( 2<= N <=100)
· Lire les éléments d’un tableau T à
N entiers
· Lire un entier X
· Calculer et afficher le nombre d’apparition de x dans ce
tableau
· Déterminer et afficher la première position
de X dans le tableau T
· Calculer et afficher le maximum des éléments
du tableau
· Renverser les éléments du tableau
T[1] avec T[n]
T[2] avec T[n-1]
. .
. .
· Insérer un entier Y à la position J
dans ce tableau (1<= J <= N)
· Trier le tableau en ordre décroissant