„ ­®  ­ âãà «ì­¥  ç¨á«®  ¯.  Ž¡ç¨á«¨â¨:
              «£. ¤®¡ã⮪(­ â.¯, ¤÷©á­.ª)
                   à£. ¯
                  १. ª
             ¯®ç. æ÷«. ÷
                  ª:=1
                 ¤«ï  ÷  ¢÷¤  1 ¤®  ¯
                 ¯æ
                   ª:=ª (1+1/÷)
                 ªæ
             ª÷­.

                10 REM  „Ž�“’ŽŠ
                20 INPUT  "‚‚…‘’ˆ  ‡�€—…��Ÿ  N"; N
                30  Š=1
                40  FOR  I=1  TO  N
                50  K=K*(1+1/I-2)
                60  NEXT  I
                70  PRINT  "K="; K
                80  END

                       ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
                       ³                      ³
                       ³       �Ž—€’ŽŠ        ³
                       ³                      ³
                       ÀÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÄÙ
                                  ³
                           ÚÄÄÄÄÄÄÁÄÄÄÄÄÄÄ¿
                           ³      N       ³
                           ÀÄÄÄÄÄÄÂÄÄÄÄÄÄÄÙ
                           ÚÄÄÄÄÄÄÁÄÄÄÄÄÄÄ¿
                           ³    K:= 1     ³
                           ÀÄÄÄÄÄÄÂÄÄÄÄÄÄÄÙ
      ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´
      ³                    ÚÄÄÄÄÄÄÁÄÄÄÄÄÄÄ¿  �ö
      ³            ÚÄÄÄÄÄÄÄ´    ö=1,¯     ÃÄÄÄÄÄÄÄ¿
      ³            ³       ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ       ³
      ³            ³                              ³
      ³            ³                              ³
      ³  ÚÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄ¿       ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
      ³  ³    Š:=Š(1+1/ö)   ³       ³
      ³  ÀÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÙ  ÚÄÄÄÄÁÄÄÄÄÄ¿
      ÀÄÄÄÄÄÄÄÄÄÄÄÄÙ           ³    Š     ³
                               ÀÄÄÄÄÂÄÄÄÄÄÙ
                                    ³
                               ÚÄÄÄÄÁÄÄÄÄÄÄ¿
                               ³  Šö�…–œ   ³
                               ÀÄÄÄÄÄÄÄÄÄÄÄÙ