Open1
40を素数の和として表す
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