vault backup: 2023-09-07 13:54:22

Algo/Séminaire/Exercices sémaines.md

@@ -105,5 +105,12 @@ else
 ```Ocaml
 let max2 number1 number2 = if number1 > number2 then number1 else number2
 let min2 number1 number2 = if number1 > number2 then number2 else number1
+
+let max3 number1 number2 number 3 = if number1 > number2 && number1> number2 then number1 else if number2 > number3 && number2>1 then number2 else number3
+
+let min3 number1 number2 number 3 = if number1 < number2 && number1< number2 then number1 else if number2 < number3 && number2<number1 then number2 else number3
+
+let middle3 number1 number2 number3 = let min = min3(number1 number2 number2) and max = max3(number1 number2 number2) in if min = number1 && max = number3 then number2 else if min = number2 && max = number1 then number3 else number2
+
 ```