L'affectation
|
Exercice 4 : page 50
|
|
Ecrire un algorithme qui saisit un
temps en seconde puis le convertit en jours, heure, minutes et secondes.
|
Corrigé :
sachant que jours=86400 heure=3600s
minute=60s
Algorithme :
Début conversion
Ecrire("Donner un temps en
seconde : "), lire(temps)
jours <-- temps div 86400
heure <-- (temps mod 86400) div
3600
minutes <-- (temps mod 3600 ) div
60
secondes <-- temps mod 60
Ecrire("jours=", jour, "
heures = ",heures, "minutes= ", minutes,
"Secondes= ", secondes)
Fin conversion
|
Exercice 6 : page 51
|
|
Soit A un tableaux de 3 chaînes de
caractères et B un tableaux de 2 entiers.
Soit la séquence d'affectation
suivante :
- A[1] <--
sous-chaine("communication",1,3)
- A[2] <-- concat("sports",".",
A[1])
- B[1] <-- pos ("o",
A[2])
- convch(2007, ch)
- A[3] <-- "www."+ A[2]
- insérer(ch,A[3], 11)
- B[2] <-- long(A[1] )
Questions:
1) Quel est le contenu de chaque
élément des deux tableaux A et B ?
2) Traduire cet algorithme en Pascal.
|
Corrigé :
1)
|
|
1
|
2
|
3
|
|
A
|
com
|
sports.com
|
www.sports2007.com
|
2)
Program ex6page51 ;
uses wincrt ;
var
A:array[1..3]of string ;
B:array[1..2]of integer ;
begin
A[1] := copy('communication',1,3) ;
A[2] := concat('sports','.', A[1]) ;
B[1] := pos ('o', A[2]) ;
str(2007, ch) ;
A[3] := 'www.'+ A[2] ;
insert (ch,A[3], 11) ;
B[2]:= length(A[1] ) ;
end.
|
|
