Add algorithmique

alogrithmique/20210903-0800.cours

@@ -0,0 +1,25 @@
+Algorithme: résolution avec discriminant de ax^2 + bx + c = 0
+Début
+    Variable D, a, b, c : Entier
+    D <- b^2-4ac
+    Si D < 0:
+        Ecrire("pas de solution")
+    Sinon Si D = 0:
+        Ecrire(-b/2a)
+    Sinon:
+        Ecrire(-b - rac(D)/2a)
+        Ecrire(-b + rac(D)/2a)
+    FinSi
+Fin
+
+
+Algorithme: Affiche la valeur absolue d'un entier lu au clavier
+Début
+    Variable n : Entier
+    Lire(n)
+    Si n < 0
+        Ecrire(-n)
+    Sinon
+        Ecrire(n)
+    FinSi
+Fin