二次公式程序麻烦
quadratic formula program trouble
所以我做了这个程序来求解二次公式。该程序还显示二次公式的判别式。公式是 (-B ± √(B^2 -4AC))/2A 判别式是 B^2 -4AC。出于某种原因，程序只会在 A 为 1 时吐出正确答案。没有语法错误会阻止代码 运行。能换个眼光看看吗？
Prompt A
Prompt B
Prompt C
(B)²-4AC→Z
(B-√(Z))→Y
(B+√(Z))→X
Disp "DISCRIMINANT"
Disp Z
Disp "X: "
(X)/2*A→D
(Y)/2*A→E
Disp D,E
我发现您的代码有两个问题。
- 您使用的是
B，而不是 -B
- 您正在做
/2*A，而不是 /(2*A)。 ti83/84 系列计算器严格从左到右计算乘法和除法。所以 /2*A 是“除以二，然后 乘以 A”。
我会按如下方式清理您的代码：
Prompt A,B,C
B²-4AC→Z
Disp "DISCRIMINANT:", Z
-B-√(Z)→Y
-B+√(Z)→X
X/(2A)→D
Y/(2A)→E
Disp "X:",D,E
所以我做了这个程序来求解二次公式。该程序还显示二次公式的判别式。公式是 (-B ± √(B^2 -4AC))/2A 判别式是 B^2 -4AC。出于某种原因，程序只会在 A 为 1 时吐出正确答案。没有语法错误会阻止代码 运行。能换个眼光看看吗？
Prompt A
Prompt B
Prompt C
(B)²-4AC→Z
(B-√(Z))→Y
(B+√(Z))→X
Disp "DISCRIMINANT"
Disp Z
Disp "X: "
(X)/2*A→D
(Y)/2*A→E
Disp D,E
我发现您的代码有两个问题。
- 您使用的是
B，而不是-B - 您正在做
/2*A，而不是/(2*A)。 ti83/84 系列计算器严格从左到右计算乘法和除法。所以/2*A是“除以二，然后 乘以 A”。
我会按如下方式清理您的代码：
Prompt A,B,C
B²-4AC→Z
Disp "DISCRIMINANT:", Z
-B-√(Z)→Y
-B+√(Z)→X
X/(2A)→D
Y/(2A)→E
Disp "X:",D,E