|
ゴンとも |
|
十進basicで以下のソースコードで
FOR a=1 TO 6 IF MOD(a,2)<>0 AND MOD(a,3)<>0 AND MOD(a,5)<>0 THEN PRINT a FOR b=1 TO 6 LET x1=10*a+b IF MOD(x1,2)<>0 AND MOD(x1,3)<>0 AND MOD(x1,5)<>0 THEN PRINT x1 FOR c=1 TO 6 LET x2=100*a+10*b+c IF MOD(x2,2)<>0 AND MOD(x2,3)<>0 AND MOD(x2,5)<>0 THEN PRINT x2 FOR d=1 TO 6 LET x3=1000*a+100*b+10*c+d IF MOD(x3,2)<>0 AND MOD(x3,3)<>0 and MOD(x3,5)<>0 THEN PRINT x3 10 NEXT d 20 NEXT c 30 NEXT b 40 NEXT a END ｆ9押して345通りを羅列！ |
|
6月9日（木） 0:44:48
37908 |