PRINT
PRINT "以下の１０個の自然数で 総和 1000 になる組み合わせ"
PRINT "            （１つの自然数は１個しか使えない）"
PRINT
PRINT "       50    80   130   190   230   250   280   310   390   440"
PRINT
LET Z=0
FOR a=0 TO 50 STEP 50
   FOR b=0 TO 80 STEP 80
      FOR c=0 TO 130 STEP 130
         FOR d=0 TO 190 STEP 190
            FOR e=0 TO 230 STEP 230
               FOR f=0 TO 250 STEP 250
                  FOR g=0 TO 280 STEP 280
                     FOR h=0 TO 310 STEP 310
                        FOR i=0 TO 390 STEP 390
                           FOR j=0 TO 440 STEP 440
                              IF a+b+c+d+e+f+g+h+i+j=1000 THEN
                                 LET Z=Z+1
                                 PRINT USING "##":Z;
                                 PRINT ":";
                                 PRINT USING "######":a;
                                 PRINT USING "######":b;
                                 PRINT USING "######":c;
                                 PRINT USING "######":d;
                                 PRINT USING "######":e;
                                 PRINT USING "######":f;
                                 PRINT USING "######":g;
                                 PRINT USING "######":h;
                                 PRINT USING "######":i;
                                 PRINT USING "######":j
                              END IF
                           NEXT j
                        NEXT i
                     NEXT h
                  NEXT g
               NEXT f
            NEXT e
         NEXT d
      NEXT c
   NEXT b
NEXT a
PRINT
END