Ci-dessous, les différences entre deux révisions de la page.
Les deux révisions précédentes Révision précédente Prochaine révision | Révision précédente | ||
dastora:fonctions_pures [2017/12/14 14:04] 195.221.62.1 |
dastora:fonctions_pures [2018/02/15 14:46] (Version actuelle) 195.221.62.1 |
||
---|---|---|---|
Ligne 60: | Ligne 60: | ||
) | ) | ||
(Definir (Pair x) | (Definir (Pair x) | ||
- | + | (Retourner (=(% x 2)0)) | |
- | (Si (=(% x 2)0) | + | ) |
- | Alors | + | |
- | (Retourner Vrai) | + | |
- | Sinon | + | |
- | (Retourner Faux))) | + | |
(Tester Pair) | (Tester Pair) | ||
(/MicroAlg) | (/MicroAlg) | ||
Ligne 79: | Ligne 75: | ||
) | ) | ||
) | ) | ||
- | (Tester Impair) | + | (Definir (Pair x) |
+ | (Retourner (=(% x 2)0)) | ||
+ | ) | ||
+ | (Definir (Impair x) | ||
+ | (Retourner (Non(Pair))) | ||
+ | ) | ||
(/MicroAlg) | (/MicroAlg) | ||
Ligne 91: | Ligne 92: | ||
(? -2) Faux | (? -2) Faux | ||
) | ) | ||
- | ) | + | ) |
+ | (Definir (Impair2 x) | ||
+ | (Retourner (Non(=(% x 2)0))) | ||
+ | ) | ||
(Tester Impair2) | (Tester Impair2) | ||
(/MicroAlg) | (/MicroAlg) | ||
Ligne 106: | Ligne 111: | ||
) | ) | ||
) | ) | ||
+ | (Definir ( S a b ) | ||
+ | (Retourner (+ a b)) | ||
+ | ) | ||
+ | |||
(Tester S) | (Tester S) | ||
(/MicroAlg) | (/MicroAlg) | ||
+ | |||
(MicroAlg "min") | (MicroAlg "min") | ||
Ligne 115: | Ligne 125: | ||
(? 7 -2) -2 | (? 7 -2) -2 | ||
) | ) | ||
+ | ) | ||
+ | (Definir ( Min a b) | ||
+ | (Tant_que (> a b) | ||
+ | Faire | ||
+ | (Affecter_a a b) | ||
+ | ) | ||
+ | |||
+ | |||
+ | (Retourner a ) | ||
) | ) | ||
(Tester Min) | (Tester Min) | ||
Ligne 125: | Ligne 144: | ||
(? 7 -2) 7 | (? 7 -2) 7 | ||
) | ) | ||
+ | ) | ||
+ | (Definir ( Max a b) | ||
+ | (Tant_que (< a b) | ||
+ | Faire | ||
+ | (Affecter_a a b ) | ||
+ | ) | ||
+ | (Retourner a ) | ||
) | ) | ||
(Tester Max) | (Tester Max) | ||
Ligne 141: | Ligne 167: | ||
(? 14 3) 2 | (? 14 3) 2 | ||
) | ) | ||
+ | ) | ||
+ | (Definir ( R a b) | ||
+ | |||
+ | (Retourner(% a b )) | ||
) | ) | ||
(Tester R) | (Tester R) | ||
Ligne 148: | Ligne 178: | ||
(MicroAlg "quotient") | (MicroAlg "quotient") | ||
- | (!!! "http://fr.wikipedia.org/wiki/Division_euclidienne") | + | (!!! "http:fr.wikipedia.org/wiki/Division_euclidienne") |
(Exemples_de Q | (Exemples_de Q | ||
(Liste | (Liste | ||
- | (? 13 5) 2 | + | (? 15 5) 3 |
- | (? 14 3) 4 | + | (? 12 3) 4 |
- | ) | + | ) |
+ | ) | ||
+ | (Definir ( Q a b) | ||
+ | (Retourner(/ a b)) | ||
) | ) | ||
(Tester Q) | (Tester Q) |