Open1

40を素数の和として表す

mmmmmm

REM 40を素数の和として表す方法の数
FOR a=0 TO 20  !2は多くても20個までしか使えない
FOR b=0 TO 13  !3は多くても13個までしか使えない
FOR c=0 TO 8 !5は多くても8個までしか使えない
FOR d=0 TO 5 !7は多くても5個までしか使えない
FOR e=0 TO 3 !11は多くても3個までしか使えない
FOR f=0 TO 3 !13は多くても3個までしか使えない
FOR g=0 TO 2 !17は多くても2個までしか使えない
FOR h=0 TO 2 !19は多くても2個までしか使えない
FOR i=0 TO 1 !23は多くても1個までしか使えない
FOR j=0 TO 1 !29は多くても1個までしか使えない
FOR k=0 TO 1 !31は多くても1個までしか使えない
FOR l=0 TO 1 !37は多くても1個までしか使えない
IF a2+b3+c5+d7+e11+f13+g17+h19+i23+j29+k31+l37=40 THEN LET s=s+1

                             NEXT L
                              
                          NEXT K
                       NEXT J
                    NEXT I
                 NEXT H
              NEXT G
           NEXT F
        NEXT E
     NEXT D
  NEXT C

NEXT B
NEXT A

PRINT s

END