#A056609型#由程序生成：#（数学）#L[n_]：=表[二项式[n，k]，{k，1，Floor[n/2]}]#c[n_]：=补码[Prime/@Range[PrimePi[n]]，First/@FactorInteger[Times@@L[n]]]#a[n_]：=模[{x=c[n]}，如果[x=={}，1，第一个[x]]]#file=OpenWrite[“output.txt”]；#对于[n=1，n<=1000，n++，WriteString[file，n，“”，a[n]，“\n”]]；#关闭[文件]#（*卢梭，2019/01/07*）1 12 13 24 15 36 17 28个39 510 111 112 113 714 5第15页第2页16 117 318 119 520 721 1122 123 124 525 1326第3页27 728 129 130 131 232 1133 1734 7个35 136 137 1938 13第39页40 141 742 143 1144 145 2346 147 148 749 550 1751 1352 153 354 1155 156 1957 2958 159 160 161 3162 163 264 1365 1166 167 1768 23第69页70 171 172 1个73 3774 575 1976 1177 1378 179 180 381 4182 183 184 1785 4386 2987 1188 189 190 1391 2392 3193 4794 1995 196 197 798 1199 5100 1101 17102 1103 13104 1105 53106 1107 1108 1109 11110 37111 1112 1113 19114 23115 29116 13117 59118 17119 1个120 11121 61122 41123 31124 5125个126个1127 2128 43129 13130 1131 1132 19133 67134 1135 17136 1137 23138个1139 1140 47141 71142 13143 1144 29145 73146 7147 37148 1149 1150 1151 19152 17153 1154 31155 13156 1157 79158 53159 1160 23161 3162 1163 41164 1165 83166 1167 1168 13169 17170 19171 43172 1173 29174 1175 1176 59177 89178 1179 1180 1181 1182 61183 23184 37185 31186 17187 47188个189 19190 1191 1192 1193 97194 1195 7196 1197 1198个199 1200 67201 101202 29203 17204 41205 103206 23207 1208 19209 1210 1211 53212 71213 107214 43215 1216 31217 109218 73219 1220 17221 37222 1223 1224 1225 113226 1227 19228 1229 23230 1231 29232 1233 1234 47235 59236 79237 17238 1239 1240个241 11242 3243 61244 7个245 41246 19247 31248 83249 5250 1251 1252 23253 127254 17255 2256 1257 43258 37259 1260 29261 131262 1263 1264 53265 19266 89267 67268 1269 1270 1271 17272 1273 137274 1275 23276 1277 139278 312791个280 1281 47282 1283 71284 19285 1286 41287 1288 17289 29290 97291 73292 1293 7294 59295 37296 1297 149298 23299 1300 43301 151302 101303 19304 61305 1306 1307 1308 103309 31310 1311 1312 1313 157314 1315 79316 1317 53个318 29319 1320 107321 23322 19323 1324 1325 163326 109327 41328 47329 1330 1331 83332 37333 167334 67335 1336 1337 13338 113339 1340 31341 19342 7343 43344 23345 173346 1347 29348 1349 1350 1351 1352 1353 59354 71355 89356 1357 179358 1个359 1360 19361 181362 11363 1364 73365 61366 1367 23368 41369 37370 53第371页第31页372个373 1374 5375 47376 29第377页378 1379 1380 127381 191382 1383 1384 1385 193386 43387 97388 1389 1390 23391 1392 131393 197394 79395 1396 1397 199398 1399 1400 1401 67402 31403 101404 1405 29406 37407 1408 1409 41410 137411 103412 59413 23414 83415 1416 139第417页418 1419 1420 1421 211422 47423 53424 1个425 71426 61427 107428 1429 43430 1431 1432 1433 31434 29435 109436 23437 73438 1439 1440 1441 1442 1443 37444 89445 223446 149447 1448 1449 1450 41451 113452 151453 227454 1455 1456 1457 229458 1459 23460 1461 1462 1463 29464 31465 233466 1467 1468 67469 47470 157471 59472 43473 79474 1475 1476 53477 239478个479 1480 37481 241482 23483 11484 97485 3486 1487 61488 163489 1490 1491 41492 29493 1494 1495 31496 71497 83498 1499 5500 167501 251502 1503 1504 101505 23506 13507 127508 1509 1510 73511 2512 1513 257514 103515 43516 47517 37518 173第519页520 1521 29522 1523 131524 1525 263526号31527 1528 23529 53530 59531 1532 41533 89534 107535 67536 179537 269538 1539 1540 1541 271542 181543 1544 109545 1546 1547 137548 61549 1550 29551 1552 79553 277554 37555 139556 1557 31558 43559 1560 1561 281562 1563 47564 113565 283566 1567 71568 1569 1570 1571 1572 191573 41574 1575 1576 1577 17578 193579 29580 83581 97582 53583 73584 1585 293586 1587 1588 31589 59个590 197591 37592 1593 1594 1595 149596 199597 1598 1599 1600 1601 43602 67603 151604 11605 101606 1607 1608 29609 61610 47611 1612 1613 307614 41615 1616 1617 103618 1619 31620 1621 311622 89623 1624 5625 313626 1627 157628 37629 1630 1631 79632 211633 317634 127635 53636 1637 29638 71639 1640 1641 107642 1643 1644 43645 1646 1647 1648 59第649页650 31651 163652 1653 109654 131655 41656 73657 47658 1659 1660 1661 331662 1663 83664 1665 37666 29667 167668 223669 67670 61671 1672 1673 337674 1675 13676 1677 113678 97679 1680 227681 31682 1683 1684 137685 7686 229687 43688 53689 1690 1691 173692 1693 347694 139695 29696 41697 349个698 233699 1700 1701 1702 37703 1704 47705 353706 101707 59708 1709 71710 79711 89712 31713号714 1715 179716 239717 359718 1719 1720 103721 19722 241723 181724 29725 11726 1727 1728 3729 73730 43731 61732 1733 367734 1735 1个736 67737 41738 1739 37740 1741 53742 1743 31744 149745 373746 83747 1架748 107749 1750 1751 47752 251753 29754 151755 1个756 1757 379758 1759 1760 1761 127762 109763 191764 1个765 383766 59767 1768 1769 1770 257771 193772 1773 43774 31775 97776 37777 389778 41779 1780 71781 1782 29783 1784 157785 131786 1787 197788 263789 79790 113791 1792 61793 397794 53795 199796 1797 1798 47799 1800 89801 401802 73803 67804 1805 31806 269807 101808 1809 1810 1811 29812 271813 37814 163815 1816 43817 409818 1819 41820 1个821 137822 1823 103824 1个825 59826 1827 1828 1829 83830 277831 1832 1833 139834 167835 1个836 31837 419838 1839 1840 29841 421842 281843 211844 13845 47846 11847 53848 283849 1850 37851 71852 1853 61854号855 107856 1第857页858 1859 43860 41861 431862 1863 1864 173865 433866 17867 31868 79869 1870 67871 109872 97873 1第874页875 73876 1877 439878 293879 1880 1881 1882 1883号884 59885 443886 1887 37888 127889 89890 1891 223892 47893 149894 179895 1896 1897 449898 31899 1900 53901 41902 43903 113904 181905 151906 1907 227908 101909 1910 1911 1912 83913 457914 61915 229916 131917号918年1月919 1920 307921 461922 71923 1924 37925 463926 103927 1928 1929 31930 1931 233932 311933 467934 1935 1936 1937 67938 313939 47940 1941 157942 41943 59944 1945 43946 1947 79948 73949 1950 317951 1952 1953 53954 191955 239956 1957 479958 137959 1960 31961 37962 107963 241964 193965 1966 1967 11968 1969 97970 1971 1972 139973 487974 1975 61976 1977 163978 89979 1980 109981 491982 1983 41984 197985 1986 47987 1988 43989 1990 1991 1992 331993 71994 199995 83996 1997 499998 37999 11000 1