Dim a, b, c, x1, x2, delta as Single
Console.WriteLine("Resolution de l'equation ax^2+bx+c=0")
Console.WriteLine("Entrez la valeur de a :")
Console.WriteLine("erreur")
Console.WriteLine("Entrez la valeur de b :")
Console.WriteLine("Entrez la valeur de c :")
Console.WriteLine("la valeur de x: "& x)