◆広島県 清川 育男 さんからの解答。
REM Fibonacci数列において法が素数のときその剰余の周期と法の関係
DIM F(4820)
DIM SO(78497)
PRINT "素数データを読み込み中．．．"
OPEN #1: NAME "A:SOSUU-999983.TXT",ACCESS INPUT, RECTYPE INTERNAL
LET SO(1)=2
FOR I=1 TO 370
READ #1: X
LET SO(I+1)=X
NEXT I
CLOSE #1
LET F(1)=1
LET F(2)=1
FOR N=3 TO 4820
LET F(N)=F(N-1)+F(N-2)
NEXT N
LET A1=-1
FOR K=1 TO 370
LET B=SO(K)
LET Z=0
FOR I=1 TO 4820
LET Z=Z+1
LET A=REMAINDER(F(I),B)
LET H=0
REM PRINT A;
REM ....1,0,周期の終わりのパターン
IF A1=1 AND A=0 THEN
LET H=1
EXIT FOR
ELSE
LET A1=A
END IF
NEXT I
IF H=1 THEN
PRINT "法 =";
PRINT USING "####":B;
PRINT" 周期 =";
PRINT USING "####":Z;
LET M=REMAINDER(Z,B)
LET R=M
IF R=0 THEN
PRINT " 周期=法*n 型"
GOTO 10
END IF
IF R=1 THEN
PRINT " 周期=法*n+1 型"
GOTO 10
END IF
IF R=2 THEN
PRINT " 周期=法*n+2 型"
GOTO 10
END IF
IF REMAINDER((B-1),Z)=0 THEN
PRINT " 法=周期*n+1 型"
GOTO 10
END IF
LET Z1=0
FOR J=1 TO 11
IF MOD( Z , 2) =0 THEN
LET Z1=Z1+1
ELSE
EXIT FOR
END IF
NEXT J
LET N=2^Z1
LET N1=Z/N
LET B1=B+1
IF MOD( B1 , N1) =0 THEN
PRINT " 法=(周期/(2^k))*n-1 型"
GOTO 10
ELSE
PRINT " 型は不明"
GOTO 10
END IF
ELSE
PRINT "法 =";
PRINT USING "####":B;
PRINT " 周期 =4821以上"
END IF
10 NEXT K
END
法 = 2 周期 = 3 周期=法*n+1 型
法 = 3 周期 = 8 周期=法*n+2 型
法 = 5 周期 = 20 周期=法*n 型
法 = 7 周期 = 16 周期=法*n+2 型
法 = 11 周期 = 10 法=周期*n+1 型
法 = 13 周期 = 28 周期=法*n+2 型
法 = 17 周期 = 36 周期=法*n+2 型
法 = 19 周期 = 18 法=周期*n+1 型
法 = 23 周期 = 48 周期=法*n+2 型
法 = 29 周期 = 14 法=周期*n+1 型
法 = 31 周期 = 30 法=周期*n+1 型
法 = 37 周期 = 76 周期=法*n+2 型
法 = 41 周期 = 40 法=周期*n+1 型
法 = 43 周期 = 88 周期=法*n+2 型
法 = 47 周期 = 32 法=(周期/(2^k))*n-1 型
法 = 53 周期 = 108 周期=法*n+2 型
法 = 59 周期 = 58 法=周期*n+1 型
法 = 61 周期 = 60 法=周期*n+1 型
法 = 67 周期 = 136 周期=法*n+2 型
法 = 71 周期 = 70 法=周期*n+1 型
法 = 73 周期 = 148 周期=法*n+2 型
法 = 79 周期 = 78 法=周期*n+1 型
法 = 83 周期 = 168 周期=法*n+2 型
法 = 89 周期 = 44 法=周期*n+1 型
法 = 97 周期 = 196 周期=法*n+2 型
法 = 101 周期 = 50 法=周期*n+1 型
法 = 103 周期 = 208 周期=法*n+2 型
法 = 107 周期 = 72 法=(周期/(2^k))*n-1 型
法 = 109 周期 = 108 法=周期*n+1 型
法 = 113 周期 = 76 法=(周期/(2^k))*n-1 型
法 = 127 周期 = 256 周期=法*n+2 型
法 = 131 周期 = 130 法=周期*n+1 型
法 = 137 周期 = 276 周期=法*n+2 型
法 = 139 周期 = 46 法=周期*n+1 型
法 = 149 周期 = 148 法=周期*n+1 型
法 = 151 周期 = 50 法=周期*n+1 型
法 = 157 周期 = 316 周期=法*n+2 型
法 = 163 周期 = 328 周期=法*n+2 型
法 = 167 周期 = 336 周期=法*n+2 型
法 = 173 周期 = 348 周期=法*n+2 型
法 = 179 周期 = 178 法=周期*n+1 型
法 = 181 周期 = 90 法=周期*n+1 型
法 = 191 周期 = 190 法=周期*n+1 型
法 = 193 周期 = 388 周期=法*n+2 型
法 = 197 周期 = 396 周期=法*n+2 型
法 = 199 周期 = 22 法=周期*n+1 型
法 = 211 周期 = 42 法=周期*n+1 型
法 = 223 周期 = 448 周期=法*n+2 型
法 = 227 周期 = 456 周期=法*n+2 型
法 = 229 周期 = 114 法=周期*n+1 型
法 = 233 周期 = 52 法=(周期/(2^k))*n-1 型
法 = 239 周期 = 238 法=周期*n+1 型
法 = 241 周期 = 240 法=周期*n+1 型
法 = 251 周期 = 250 法=周期*n+1 型
法 = 257 周期 = 516 周期=法*n+2 型
法 = 263 周期 = 176 法=(周期/(2^k))*n-1 型
法 = 269 周期 = 268 法=周期*n+1 型
法 = 271 周期 = 270 法=周期*n+1 型
法 = 277 周期 = 556 周期=法*n+2 型
法 = 281 周期 = 56 法=周期*n+1 型
法 = 283 周期 = 568 周期=法*n+2 型
法 = 293 周期 = 588 周期=法*n+2 型
法 = 307 周期 = 88 法=(周期/(2^k))*n-1 型
法 = 311 周期 = 310 法=周期*n+1 型
法 = 313 周期 = 628 周期=法*n+2 型
法 = 317 周期 = 636 周期=法*n+2 型
法 = 331 周期 = 110 法=周期*n+1 型
法 = 337 周期 = 676 周期=法*n+2 型
法 = 347 周期 = 232 法=(周期/(2^k))*n-1 型
法 = 349 周期 = 174 法=周期*n+1 型
法 = 353 周期 = 236 法=(周期/(2^k))*n-1 型
法 = 359 周期 = 358 法=周期*n+1 型
法 = 367 周期 = 736 周期=法*n+2 型
法 = 373 周期 = 748 周期=法*n+2 型
法 = 379 周期 = 378 法=周期*n+1 型
法 = 383 周期 = 768 周期=法*n+2 型
法 = 389 周期 = 388 法=周期*n+1 型
法 = 397 周期 = 796 周期=法*n+2 型
法 = 401 周期 = 200 法=周期*n+1 型
法 = 409 周期 = 408 法=周期*n+1 型
法 = 419 周期 = 418 法=周期*n+1 型
法 = 421 周期 = 84 法=周期*n+1 型
法 = 431 周期 = 430 法=周期*n+1 型
法 = 433 周期 = 868 周期=法*n+2 型
法 = 439 周期 = 438 法=周期*n+1 型
法 = 443 周期 = 888 周期=法*n+2 型
法 = 449 周期 = 448 法=周期*n+1 型
法 = 457 周期 = 916 周期=法*n+2 型
法 = 461 周期 = 46 法=周期*n+1 型
法 = 463 周期 = 928 周期=法*n+2 型
法 = 467 周期 = 936 周期=法*n+2 型
法 = 479 周期 = 478 法=周期*n+1 型
法 = 487 周期 = 976 周期=法*n+2 型
法 = 491 周期 = 490 法=周期*n+1 型
法 = 499 周期 = 498 法=周期*n+1 型
法 = 503 周期 =1008 周期=法*n+2 型
法 = 509 周期 = 254 法=周期*n+1 型
法 = 521 周期 = 26 法=周期*n+1 型
法 = 523 周期 =1048 周期=法*n+2 型
法 = 541 周期 = 90 法=周期*n+1 型
法 = 547 周期 =1096 周期=法*n+2 型
法 = 557 周期 = 124 法=(周期/(2^k))*n-1 型
法 = 563 周期 = 376 法=(周期/(2^k))*n-1 型
法 = 569 周期 = 568 法=周期*n+1 型
法 = 571 周期 = 570 法=周期*n+1 型
法 = 577 周期 =1156 周期=法*n+2 型
法 = 587 周期 =1176 周期=法*n+2 型
法 = 593 周期 =1188 周期=法*n+2 型
法 = 599 周期 = 598 法=周期*n+1 型
法 = 601 周期 = 600 法=周期*n+1 型
法 = 607 周期 =1216 周期=法*n+2 型
法 = 613 周期 =1228 周期=法*n+2 型
法 = 617 周期 =1236 周期=法*n+2 型
法 = 619 周期 = 206 法=周期*n+1 型
法 = 631 周期 = 630 法=周期*n+1 型
法 = 641 周期 = 640 法=周期*n+1 型
法 = 643 周期 =1288 周期=法*n+2 型
法 = 647 周期 =1296 周期=法*n+2 型
法 = 653 周期 =1308 周期=法*n+2 型
法 = 659 周期 = 658 法=周期*n+1 型
法 = 661 周期 = 220 法=周期*n+1 型
法 = 673 周期 =1348 周期=法*n+2 型
法 = 677 周期 = 452 法=(周期/(2^k))*n-1 型
法 = 683 周期 =1368 周期=法*n+2 型
法 = 691 周期 = 138 法=周期*n+1 型
法 = 701 周期 = 700 法=周期*n+1 型
法 = 709 周期 = 118 法=周期*n+1 型
法 = 719 周期 = 718 法=周期*n+1 型
法 = 727 周期 =1456 周期=法*n+2 型
法 = 733 周期 =1468 周期=法*n+2 型
法 = 739 周期 = 738 法=周期*n+1 型
法 = 743 周期 = 496 法=(周期/(2^k))*n-1 型
法 = 751 周期 = 750 法=周期*n+1 型
法 = 757 周期 =1516 周期=法*n+2 型
法 = 761 周期 = 380 法=周期*n+1 型
法 = 769 周期 = 192 法=周期*n+1 型
法 = 773 周期 =1548 周期=法*n+2 型
法 = 787 周期 =1576 周期=法*n+2 型
法 = 797 周期 = 228 法=(周期/(2^k))*n-1 型
法 = 809 周期 = 202 法=周期*n+1 型
法 = 811 周期 = 270 法=周期*n+1 型
法 = 821 周期 = 820 法=周期*n+1 型
法 = 823 周期 =1648 周期=法*n+2 型
法 = 827 周期 =1656 周期=法*n+2 型
法 = 829 周期 = 276 法=周期*n+1 型
法 = 839 周期 = 838 法=周期*n+1 型
法 = 853 周期 =1708 周期=法*n+2 型
法 = 857 周期 =1716 周期=法*n+2 型
法 = 859 周期 = 78 法=周期*n+1 型
法 = 863 周期 =1728 周期=法*n+2 型
法 = 877 周期 =1756 周期=法*n+2 型
法 = 881 周期 = 176 法=周期*n+1 型
法 = 883 周期 =1768 周期=法*n+2 型
法 = 887 周期 =1776 周期=法*n+2 型
法 = 907 周期 =1816 周期=法*n+2 型
法 = 911 周期 = 70 法=周期*n+1 型
法 = 919 周期 = 102 法=周期*n+1 型
法 = 929 周期 = 928 法=周期*n+1 型
法 = 937 周期 =1876 周期=法*n+2 型
法 = 941 周期 = 470 法=周期*n+1 型
法 = 947 周期 =1896 周期=法*n+2 型
法 = 953 周期 = 212 法=(周期/(2^k))*n-1 型
法 = 967 周期 = 176 法=(周期/(2^k))*n-1 型
法 = 971 周期 = 970 法=周期*n+1 型
法 = 977 周期 = 652 法=(周期/(2^k))*n-1 型
法 = 983 周期 =1968 周期=法*n+2 型
法 = 991 周期 = 198 法=周期*n+1 型
法 = 997 周期 =1996 周期=法*n+2 型
法 =1009 周期 = 126 法=周期*n+1 型
法 =1013 周期 =2028 周期=法*n+2 型
法 =1019 周期 =1018 法=周期*n+1 型
法 =1021 周期 = 510 法=周期*n+1 型
法 =1031 周期 = 206 法=周期*n+1 型
法 =1033 周期 =2068 周期=法*n+2 型
法 =1039 周期 =1038 法=周期*n+1 型
法 =1049 周期 = 262 法=周期*n+1 型
法 =1051 周期 =1050 法=周期*n+1 型
法 =1061 周期 = 530 法=周期*n+1 型
法 =1063 周期 =2128 周期=法*n+2 型
法 =1069 周期 = 356 法=周期*n+1 型
法 =1087 周期 = 128 法=(周期/(2^k))*n-1 型
法 =1091 周期 =1090 法=周期*n+1 型
法 =1093 周期 =2188 周期=法*n+2 型
法 =1097 周期 = 732 法=(周期/(2^k))*n-1 型
法 =1103 周期 = 96 法=(周期/(2^k))*n-1 型
法 =1109 周期 = 554 法=周期*n+1 型
法 =1117 周期 =2236 周期=法*n+2 型
法 =1123 周期 =2248 周期=法*n+2 型
法 =1129 周期 =1128 法=周期*n+1 型
法 =1151 周期 = 230 法=周期*n+1 型
法 =1153 周期 =2308 周期=法*n+2 型
法 =1163 周期 =2328 周期=法*n+2 型
法 =1171 周期 =1170 法=周期*n+1 型
法 =1181 周期 =1180 法=周期*n+1 型
法 =1187 周期 =2376 周期=法*n+2 型
法 =1193 周期 =2388 周期=法*n+2 型
法 =1201 周期 =1200 法=周期*n+1 型
法 =1213 周期 =2428 周期=法*n+2 型
法 =1217 周期 = 812 法=(周期/(2^k))*n-1 型
法 =1223 周期 = 816 法=(周期/(2^k))*n-1 型
法 =1229 周期 = 614 法=周期*n+1 型
法 =1231 周期 = 410 法=周期*n+1 型
法 =1237 周期 =2476 周期=法*n+2 型
法 =1249 周期 = 624 法=周期*n+1 型
法 =1259 周期 =1258 法=周期*n+1 型
法 =1277 周期 = 852 法=(周期/(2^k))*n-1 型
法 =1279 周期 = 426 法=周期*n+1 型
法 =1283 周期 =2568 周期=法*n+2 型
法 =1289 周期 = 322 法=周期*n+1 型
法 =1291 周期 = 430 法=周期*n+1 型
法 =1297 周期 =2596 周期=法*n+2 型
法 =1301 周期 =1300 法=周期*n+1 型
法 =1303 周期 =2608 周期=法*n+2 型
法 =1307 周期 = 872 法=(周期/(2^k))*n-1 型
法 =1319 周期 =1318 法=周期*n+1 型
法 =1321 周期 =1320 法=周期*n+1 型
法 =1327 周期 =2656 周期=法*n+2 型
法 =1361 周期 = 680 法=周期*n+1 型
法 =1367 周期 =2736 周期=法*n+2 型
法 =1373 周期 =2748 周期=法*n+2 型
法 =1381 周期 = 460 法=周期*n+1 型
法 =1399 周期 =1398 法=周期*n+1 型
法 =1409 周期 = 704 法=周期*n+1 型
法 =1423 周期 =2848 周期=法*n+2 型
法 =1427 周期 = 168 法=(周期/(2^k))*n-1 型
法 =1429 周期 =1428 法=周期*n+1 型
法 =1433 周期 =2868 周期=法*n+2 型
法 =1439 周期 =1438 法=周期*n+1 型
法 =1447 周期 =2896 周期=法*n+2 型
法 =1451 周期 =1450 法=周期*n+1 型
法 =1453 周期 =2908 周期=法*n+2 型
法 =1459 周期 =1458 法=周期*n+1 型
法 =1471 周期 = 490 法=周期*n+1 型
法 =1481 周期 =1480 法=周期*n+1 型
法 =1483 周期 = 424 法=(周期/(2^k))*n-1 型
法 =1487 周期 =2976 周期=法*n+2 型
法 =1489 周期 =1488 法=周期*n+1 型
法 =1493 周期 =2988 周期=法*n+2 型
法 =1499 周期 =1498 法=周期*n+1 型
法 =1511 周期 = 302 法=周期*n+1 型
法 =1523 周期 =1016 法=(周期/(2^k))*n-1 型
法 =1531 周期 =1530 法=周期*n+1 型
法 =1543 周期 =3088 周期=法*n+2 型
法 =1549 周期 = 774 法=周期*n+1 型
法 =1553 周期 =1036 法=(周期/(2^k))*n-1 型
法 =1559 周期 =1558 法=周期*n+1 型
法 =1567 周期 =3136 周期=法*n+2 型
法 =1571 周期 =1570 法=周期*n+1 型
法 =1579 周期 = 526 法=周期*n+1 型
法 =1583 周期 =3168 周期=法*n+2 型
法 =1597 周期 = 68 法=(周期/(2^k))*n-1 型
法 =1601 周期 = 160 法=周期*n+1 型
法 =1607 周期 =3216 周期=法*n+2 型
法 =1609 周期 =1608 法=周期*n+1 型
法 =1613 周期 =3228 周期=法*n+2 型
法 =1619 周期 =1618 法=周期*n+1 型
法 =1621 周期 = 810 法=周期*n+1 型
法 =1627 周期 =3256 周期=法*n+2 型
法 =1637 周期 =3276 周期=法*n+2 型
法 =1657 周期 =3316 周期=法*n+2 型
法 =1663 周期 =3328 周期=法*n+2 型
法 =1667 周期 =3336 周期=法*n+2 型
法 =1669 周期 = 834 法=周期*n+1 型
法 =1693 周期 =3388 周期=法*n+2 型
法 =1697 周期 =3396 周期=法*n+2 型
法 =1699 周期 = 566 法=周期*n+1 型
法 =1709 周期 = 854 法=周期*n+1 型
法 =1721 周期 = 430 法=周期*n+1 型
法 =1723 周期 =3448 周期=法*n+2 型
法 =1733 周期 =1156 法=(周期/(2^k))*n-1 型
法 =1741 周期 = 870 法=周期*n+1 型
法 =1747 周期 =3496 周期=法*n+2 型
法 =1753 周期 =3508 周期=法*n+2 型
法 =1759 周期 =1758 法=周期*n+1 型
法 =1777 周期 =3556 周期=法*n+2 型
法 =1783 周期 =3568 周期=法*n+2 型
法 =1787 周期 =3576 周期=法*n+2 型
法 =1789 周期 = 894 法=周期*n+1 型
法 =1801 周期 =1800 法=周期*n+1 型
法 =1811 周期 =1810 法=周期*n+1 型
法 =1823 周期 =1216 法=(周期/(2^k))*n-1 型
法 =1831 周期 =1830 法=周期*n+1 型
法 =1847 周期 =3696 周期=法*n+2 型
法 =1861 周期 = 930 法=周期*n+1 型
法 =1867 周期 =3736 周期=法*n+2 型
法 =1871 周期 = 374 法=周期*n+1 型
法 =1873 周期 =3748 周期=法*n+2 型
法 =1877 周期 =1252 法=(周期/(2^k))*n-1 型
法 =1879 周期 =1878 法=周期*n+1 型
法 =1889 周期 =1888 法=周期*n+1 型
法 =1901 周期 =1900 法=周期*n+1 型
法 =1907 周期 =3816 周期=法*n+2 型
法 =1913 周期 =1276 法=(周期/(2^k))*n-1 型
法 =1931 周期 =1930 法=周期*n+1 型
法 =1933 周期 =3868 周期=法*n+2 型
法 =1949 周期 =1948 法=周期*n+1 型
法 =1951 周期 = 390 法=周期*n+1 型
法 =1973 周期 =1316 法=(周期/(2^k))*n-1 型
法 =1979 周期 =1978 法=周期*n+1 型
法 =1987 周期 =3976 周期=法*n+2 型
法 =1993 周期 =3988 周期=法*n+2 型
法 =1997 周期 =3996 周期=法*n+2 型
法 =1999 周期 = 666 法=周期*n+1 型
法 =2003 周期 =4008 周期=法*n+2 型
法 =2011 周期 =2010 法=周期*n+1 型
法 =2017 周期 =4036 周期=法*n+2 型
法 =2027 周期 =1352 法=(周期/(2^k))*n-1 型
法 =2029 周期 =1014 法=周期*n+1 型
法 =2039 周期 =2038 法=周期*n+1 型
法 =2053 周期 =4108 周期=法*n+2 型
法 =2063 周期 =4128 周期=法*n+2 型
法 =2069 周期 =1034 法=周期*n+1 型
法 =2081 周期 = 130 法=周期*n+1 型
法 =2083 周期 =4168 周期=法*n+2 型
法 =2087 周期 =4176 周期=法*n+2 型
法 =2089 周期 =1044 法=周期*n+1 型
法 =2099 周期 =2098 法=周期*n+1 型
法 =2111 周期 =2110 法=周期*n+1 型
法 =2113 周期 =4228 周期=法*n+2 型
法 =2129 周期 =2128 法=周期*n+1 型
法 =2131 周期 =2130 法=周期*n+1 型
法 =2137 周期 =4276 周期=法*n+2 型
法 =2141 周期 =2140 法=周期*n+1 型
法 =2143 周期 =4288 周期=法*n+2 型
法 =2153 周期 =4308 周期=法*n+2 型
法 =2161 周期 = 80 法=周期*n+1 型
法 =2179 周期 = 198 法=周期*n+1 型
法 =2203 周期 =4408 周期=法*n+2 型
法 =2207 周期 = 64 法=(周期/(2^k))*n-1 型
法 =2213 周期 =4428 周期=法*n+2 型
法 =2221 周期 = 148 法=周期*n+1 型
法 =2237 周期 =1492 法=(周期/(2^k))*n-1 型
法 =2239 周期 = 746 法=周期*n+1 型
法 =2243 周期 =1496 法=(周期/(2^k))*n-1 型
法 =2251 周期 = 750 法=周期*n+1 型
法 =2267 周期 =1512 法=(周期/(2^k))*n-1 型
法 =2269 周期 = 324 法=周期*n+1 型
法 =2273 周期 =4548 周期=法*n+2 型
法 =2281 周期 = 760 法=周期*n+1 型
法 =2287 周期 =4576 周期=法*n+2 型
法 =2293 周期 =4588 周期=法*n+2 型
法 =2297 周期 =4596 周期=法*n+2 型
法 =2309 周期 =2308 法=周期*n+1 型
法 =2311 周期 =2310 法=周期*n+1 型
法 =2333 周期 =1556 法=(周期/(2^k))*n-1 型
法 =2339 周期 =2338 法=周期*n+1 型
法 =2341 周期 =2340 法=周期*n+1 型
法 =2347 周期 =4696 周期=法*n+2 型
法 =2351 周期 =2350 法=周期*n+1 型
法 =2357 周期 =4716 周期=法*n+2 型
法 =2371 周期 = 790 法=周期*n+1 型
法 =2377 周期 =4756 周期=法*n+2 型
法 =2381 周期 =2380 法=周期*n+1 型
法 =2383 周期 =4768 周期=法*n+2 型
法 =2389 周期 = 398 法=周期*n+1 型
法 =2393 周期 =4788 周期=法*n+2 型
法 =2399 周期 =2398 法=周期*n+1 型
法 =2411 周期 =2410 法=周期*n+1 型
法 =2417 周期 = 124 法=(周期/(2^k))*n-1 型
法 =2423 周期 =4821以上
法 =2437 周期 =4821以上
法 =2441 周期 =1220 法=周期*n+1 型
法 =2447 周期 =1632 法=(周期/(2^k))*n-1 型
法 =2459 周期 =2458 法=周期*n+1 型
法 =2467 周期 =4821以上
法 =2473 周期 =4821以上
法 =2477 周期 =4821以上
法 =2503 周期 =4821以上
法 =2521 周期 = 120 法=周期*n+1 型
法 =2531 周期 =2530 法=周期*n+1 型
解答へもどる
数学の部屋へもどる