``

慜暸 師暸

    IF 乣 END IF 偲 IF 乣 ELSE 乣 END IF 仚仚仚

      忦審偵傛偭偰幚峴偡傞暥傪曄偊傞丅

    (1)  IF 榑棟幃 THEN
           乧乧乧
         END IF
      榑棟幃偑恀偱偁傞偲偒丆乧乧乧傪幚峴偡傞丅
      乧乧乧偺晹暘偵偼暋悢峴偺暥傪彂偔偙偲偑偱偒傞丅
    椺
      10! 俀師曽掱幃偺夝
      20 INPUT a, b, c
      30 LET D=b^2-4*a*c
      40 IF D>=0 THEN
      50    PRINT (-b + SQR(D)) / (2*a), (-b-SQR(D))/(2*a)
      60 END IF
      70 END
      D亞0偺偲偒丆50峴偺print暥偑幚峴偝傟傞丅

    (2)  IF 榑棟幃 THEN
           乧乧乧1
         ELSE
           乧乧乧2
         END IF
      榑棟幃偑恀偱偁傞偲偒乧乧乧1傪幚峴偟丆婾偱偁傞偲偒乧乧乧2傪幚峴偡傞丅
    椺
      10 ! 俀師曽掱幃偺夝
      20 INPUT a, b, c
      30 LET D=b^2-4*a*c
      40 IF D>=0 THEN
      50    PRINT (-b + SQR(D)) / (2*a), (-b-SQR(D))/(2*a)
      60 ELSE
      70    PRINT "no solution"
      80 END IF
      90 END
      D亞0偺偲偒50峴偺print暥偑幚峴偝傟丆D亙偺偲偒偼70峴偺print暥偑幚峴偝傟傞丅