◆広島県 清川 育男 さんからの解答。
プログラムを組んで規則性を探してしました。奇麗な規則性が見つかりました。
5 8 14 27 45 47 48 54 65 68 74 87 105 107 108 114 125 128 134 147 165 167 168 174 185 188 194 207 225 227 228 234 245 248 254 267 285 287 288 294 305 308 314 327 345 347 348 354 365 368 374 387 405 407 408 414 425 428 434 447 465 467 468 474 485 488 494 507 525 527 528 534 545 548 554 567 585 587 588 594 605 608 614 627 645 647 648 654 665 668 674 687 705 707 708 714 725 728 734 747 765 767 768 774 785 788 794 807 825 827 828 834 845 848 854 867 885 887 888 894 905 908 914 927 945 947 948 954 965 968 974 987 1005 1007 1008 1014 1025 1028 1034 1047 1065 1067 1068 1074 1085 1088 1094 1107 1125 1127 1128 1134 1145 1148 1154 1167 1185 1187 1188 1194 1205 1208 1214 1227 1245 1247 1248 1254 1265 1268 1274 1287 1305 1307 1308 1314 1325 1328 1334 1347 1365 1367 1368 1374 1385 1388 1394 1407 1425 1427 1428 1434 1445 1448 1454 1467 1485 1487 1488 1494 1505 1508 1514 1527 1545 1547 1548 1554 1565 1568 1574 1587 1605 1607 1608 1614 1625 1628 1634 1647 1665 1667 1668 1674 1685 1688 1694 1707 1725 1727 1728 1734 1745 1748 1754 1767 1785 1787 1788 1794 1805 1808 1814 1827 1845 1847 1848 1854 1865 1868 1874 1887 1905 1907 1908 1914 1925 1928 1934 1947 1965 1967 1968 1974 1985 1988 1994答え 267
DIM A(2001)
LET A(1)=0
LET A(2)=1
FOR I=3 TO 2001
LET A(I)=A(I-1)+A(I-2)
LET A(I)=REMAINDER(A(I),10)
NEXT I
LET Z=0
FOR I=1 TO 2001
IF A(I)=3 THEN
LET Z=Z+1
PRINT USING "#######":I;
IF MOD( Z ,8) =0 THEN
PRINT
END IF
END IF
NEXT I
PRINT
PRINT
PRINT Z
END
◆広島県 清川 育男 さんからの解答。
プログラムを０−９までのに変えました。
| 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 |
| 134 | 268 | 133 | 267 | 135 | 267 | 132 | 267 | 133 | 265 |
OPTION BASE 0
DIM A(2001)
DIM B(9)
LET A(1)=0
LET A(2)=1
FOR I=3 TO 2001
LET A(I)=A(I-1)+A(I-2)
LET A(I)=REMAINDER(A(I),10)
NEXT I
FOR K=0 TO 9
PRINT " １の位の数";K
PRINT
LET Z=0
FOR I=1 TO 2001
IF A(I)=K THEN
LET Z=Z+1
PRINT USING "#######":I;
IF MOD( Z ,8) =0 THEN
PRINT
END IF
END IF
NEXT I
LET B(K)=Z
PRINT
PRINT
PRINT USING "######":Z;
PRINT "個"
PRINT
PRINT
NEXT K
FOR I=0 TO 9
PRINT USING "#####":B(I);
NEXT I
PRINT
END
◆宮城県 アンパンマン さんからの解答。
0,1,1,2,3,5,8,3,1,4, 5,9,4,3,7,0,7,7,4,1, 5,6,1,7,8,5,3,8,1,9, 0,9,9,8,7,5,2,7,9,6, 5,1,6,7,3,0,3,3,6,9, 5,4,9,3,2,5,7,2,9,1, 0,1,1,....周期６０です。(3の数＝８）
３の数＝３３×８＋３＝２６７
◆東京都 BossF さんからの解答。
フィボナッチ数の1の位は順に
0,1,1,2,3,5,8,3,1,4,5,9,4,3,7,0,7,7,4,1, 5,6,1,7,8,5,3,8,1,9,0,9,9,8,7,5,2,7,9,6, 5,1,6,7,3,0,3,3,6,9,5,4,9,3,2,5,7,2,9,1, 0,1,････よってフィボナッチ数の1の位は周期60で,1周期に３は7個あるから