拓展拓展1. 1. 将下将下列解一元二次列解一元二次方程方程axax2 2+bx+c=0+bx+c=0的程序框图转的程序框图转化为程序化为程序. .开始开始输入输入a，b，c= b2- -4ac0？=0？否否x1=p+q输出输出x1，x2结束结束否否是是x2=p- -q输出输出x1=x2=p是是输出输出“方程没有方程没有实数根实数根”观察程序框图可以发现，其中包含观察程序框图可以发现，其中包含两个条件结构，而且内层的条件结两个条件结构，而且内层的条件结构是外层的调解结构的一个分支。构是外层的调解结构的一个分支。所以，可以用所以，可以用“IF-THEN-ELSE-END 语句来完成转化。ENDENDINPUT INPUT “a a，b b，c=c=”；a a，b b，c cd=bd=b2-4*a*c2-4*a*cIF dIF d=0 THEN=0 THENp= -b/(2*a)p= -b/(2*a)q=SQR(d)/(2*a)q=SQR(d)/(2*a)IF d=0 THENIF d=0 THENPRINT PRINT “x x1 1=x=x2 2= =”；p pELSEELSEPRINT PRINT “x1x1，x2=x2=”；p+qp+q，p-qp-qEND IFEND IFELSEELSEPRINT PRINT “No real root.No real root.”ENDEND IFIF拓展2.编写一个程序，从键盘上输入一个数，若是正数就将其输出当