Open1

40を素数の和として表す

mmmmmm

REM 40を素数の和として表す方法の数
FOR a=0 TO 20
FOR b=0 TO 13
FOR c=0 TO 8
FOR d=0 TO 5
FOR e=0 TO 3
FOR f=0 TO 3
FOR g=0 TO 2
FOR h=0 TO 2
FOR i=0 TO 1
FOR j=0 TO 1
FOR k=0 TO 1
FOR l=0 TO 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