les-methode-d-inverse-palandrome-symetrique/les methode d'inverse.algox at main · amineTNYT/les-methode-d-inverse-palandrome-symetrique · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
fonction palendrome(ch:chaîne de caractère) : booléen                          #pour vérifier si une chaîne est symétrique
Début
i <- 0
n <- long(ch)
p <- Vrai

Tant que i < (n div 2) et p = Vrai faire
    Si ch[i] ≠ ch[n - 1 - i] alors
        p <- Faux
    FinSi
    i <- i + 1
FinTantQue

Retourner p
Fin
-----------------------------------------------------------------------------------------------------------------------

fonction palendrome(ch:chaîne de caractère) : booléen                   #pour vérifier si une chaîne est symétrique
Début
left <-- 0
right <-- long(ch) - 1
p <- Vrai

Tant que left < right faire
    Si ch[left] < ch[right] alors
        p <- Faux
    FinSi
    left <- left + 1
    right <- right - 1
FinTantQue
Retourner p
Fin
--------------------------------------------------------------------------------------------------

fonction inverse(ch:chaîne de caractère) : chaîne               #inverser une chaine de caractére
Début
resultat <-- ""
Pour i de long(ch) - 1 à 0 pas -1 faire
    resultat <-- resultat + ch[i]
FinPour
Retourner resultat
Fin
--------------------------------------------------------------------------------------------------
fonction inverse(ch:chaîne de caractère) : chaîne                 #inverser une chaine de caractére
Début
ch0 <-- ""
Pour i <-- 0 à long(ch) - 1 faire
    ch0 <-- ch[i] + ch0
FinPour

Retourner ch0
Fin
---------------------------------------------------------------------
fonction inverse(x:entier) : entier                              #inverser un nombre
Début
original <-- x
m <-- 0
fonction inverse(x:entier) :entier
Début
Tant que x > 0 faire
    s <- x mod 10        // reste de la division par 10
    m <- m * 10 + s      // construire le nombre inversé
    x <- x div 10        // enlever le dernier chiffre
FinTantQue

Retourner (m)
Fin
--------------------------------------------------------------------------
fonction inverse(x:entier) :entier
Début
nombre_inverse <-- 0

Tant que x > 0 faire
    chiffre <-- x mod 10                          // obtenir le dernier chiffre
    nombre_inverse <-- nombre_inverse * 10 + chiffre      // ajouter le chiffre à l'inverse
    x <-- x div 10                                // supprimer le dernier chiffre
FinTantQue

Retourner nombre_inverse                      // retourner le nombre inversé
fin


----------------------------------------------------------------------------------------
fonction inversé(ch:chaîne):chaîne
Début
ch <-- Convch(x)        // convertir le nombre en chaîne
chx <-- ""              // chaîne inversée vide

Tant que ch  ≠ "" faire
    chx <- ch[0] + chx             // ajouter le premier caractère au début
    ch <- Effacer(ch, 0, 1)        // supprimer le premier caractère
FinTantQue

Retourner chx            // retourner la chaîne inversée

Fin