【正文】
y=0 ELSE y=- 1 END IF END IF PRINT y END (嵌套結(jié)構(gòu)) 2020年 12月 19日星期六4時(shí) 41分 47秒 1 18 程序二 程序框圖(右圖): 程序如下: INPUT x IF x0 THEN y=1 END IF IF x=0 THEN y=0 END IF IF x0 THEN y=- 1 END IF PRINT y END (疊加結(jié)構(gòu)) 2020年 12月 19日星期六4時(shí) 41分 47秒 1 19 例 ,輸入一元二次方程 的系數(shù) ,輸出方程的實(shí)數(shù)根 . a x b x c? ? ?2 0算 法 第一步:輸入三個(gè)系數(shù) ,a b c第二步:計(jì)算 2 4b a c? ? ?0??第四步:判斷 是否成立 .若是,則輸出 12x x p??否則,計(jì)算 12 ,x p q x p q? ? ? ?并輸出 12,.xx第三步:判斷 0?? 是否成立 .若是,則計(jì)算 ,22bpqaa?? ? ?否則,輸出“ 方程沒有實(shí)數(shù)根 ”,結(jié)束算法 . 2020年 12月 19日星期六4時(shí) 41分 47秒 1 20 程序框圖 開始 輸入 ,a b c2q a??0???2 4b a c? ? ?0???2x p q??12,xx輸出 結(jié)束 2bp a??是 輸出 p是 方程沒有實(shí)數(shù)根 否 1x p q??否 2020年 12月 19日星期六4時(shí) 41分 47秒 1 21 否 輸入 a,b,c 開始 ? =b24ac ?≥0? 是 p=b/2a aq ? ? 2/?=0? x1=p+q x2=pq 輸出 x1,x2 無解 輸出 p 結(jié)束 是 否 程 序 p= – b/(2*a) q=SQR(d)/(2*a) IF d=0 THEN IF d=0 THEN PRINT “xl,x2=”。p+q,pq END IF ELSE PRINT “No real root.” END IF END INPUT “a,b,c= ” 。a,b,c PRINT “x1=x2”。p ELSE d=b^24*a*c 2020年 12月 19日星期六4時(shí) 41分 47秒 1 22 滿足條件? 步驟 A 是 否 程序框圖 條件語句的一般格式 IF 條件 THEN 語句體 END IF 滿足條件?