解一元二次方程以及求二次函数的顶点坐标程序 局部变量 程序 INPUT A INPUT B INPUT C D=B²-4AC R=-B/(2A) I=√(ABS D)/(2A) IF D<0 GOTO L1 X1=R+I PRINT X1 WAIT X2=R-I PRINT X2 GOTO L2 LABEL L1 PRINT R WAIT PRINT I LABEL L2 WAIT H=R PRINT H WAIT K=-AI² PRINT K END 若Δ≥0,输出方程的两个根,否则输入方程根的实部和虚部绝对值。然后输出二次函数顶点横纵坐标