 เขียนรหัสเทียมเพื่อคำนวณรากของสมการกำลังสอง
 ``` ฟังก์ชัน Quadratic_Equation_Roots (a, b, c) // คำนวณการจำแนกจำแนก <- b2 - 4 * a * c // คำนวณรากทั้งสองหากจำแนก > 0 ราก1 <- (-b + Sqrt(จำแนก)) / (2 * a) Root2 <- (-b - Sqrt(Discriminant)) / (2 * a) อื่น ถ้า Discriminant = 0 Root1 = Root2 <- - b / (2 * a) อื่น ส่งกลับ "รากจินตภาพ" End Function ` ``