Forcal+HugeCalc可以计算下面的数(只有指数部分不能是大整数):
(1000!)^1000%(2000!)
代码:
!using["HugeCalc"];
mvar:
i: oo{
a=HI[0].Fac[1000], //1000!
b=HI[0].Fac[2000], //2000!
printff["\r\n"],
[Pow(a,1000)%b].Show[]
};复制代码
结果:
35 889 105 242 670 044 476 059 938 387 732 164 444 226 153 630 475 054 216 583 912 665 765 273 555 362 176 347 834 364 867 290 059 933 208 858 974 343 743 809 570 169 818 960 408 256 190 046 451 169 987 651 702 340 140 461 445 291 825 224 802 125 901 311 145 579 508 913 453 923 883 679 732 392 306 183 550 939 373 593 431 177 110 305 751 992 419 366 391 248 656 931 904 733 237 756 991 795 584 349 089 432 588 237 772 923 890 725 368 833 627 768 548 736 626 811 112 587 369 430 341 792 585 496 885 121 572 065 394 398 449 118 993 826 122 044 324 911 388 982 590 078 992 290 908 252 300 289 430 942 582 414 066 108 362 203 145 506 005 598 055 661 735 424 503 892 159 021 897 660 293 211 012 960 944 263 585 580 839 793 688 303 692 279 837 107 519 958 190 950 060 882 963 166 417 430 553 179 305 227 137 121 386 803 080 354 804 484 423 640 350 104 261 934 751 188 690 125 794 955 358 908 582 332 990 190 301 314 721 504 689 303 314 776 936 566 173 067 050 882 389 127 247 144 036 161 476 454 964 183 925 599 710 257 210 745 979 044 473 748 940 243 147 321 135 906 316 253 622 232 021 188 527 244 127 845 627 983 450 185 370 679 697 745 771 190 323 714 027 931 166 803 622 741 531 528 250 699 365 261 888 329 595 364 232 717 841 742 450 455 903 803 018 183 114 967 514 122 060 668 973 705 429 665 392 790 593 602 683 764 903 393 771 949 568 770 645 979 058 584 776 766 329 426 147 084 186 230 739 387 984 037 030 360 622 129 722 934 012 991 700 086 859 086 628 325 851 975 125 123 966 631 692 038 747 115 327 211 800 744 362 480 093 669 965 513 513 959 444 309 839 834 315 700 126 692 277 669 591 429 460 947 165 793 015 578 511 705 816 930 797 264 211 782 023 964 290 198 494 758 861 596 575 616 872 461 139 127 789 966 067 181 082 473 829 424 709 546 767 876 072 090 953 178 676 029 488 300 604 895 756 836 585 984 678 439 600 780 966 654 442 012 800 810 117 444 481 791 187 510 110 802 638 787 559 511 036 157 411 692 812 395 216 228 922 107 071 250 961 878 720 764 210 068 360 735 074 408 239 085 772 953 078 474 025 024 687 195 121 368 302 212 333 855 495 058 384 834 229 548 621 322 142 042 709 977 521 841 313 902 856 609 232 930 204 619 429 999 188 796 382 960 761 646 691 534 468 729 609 731 084 811 451 326 459 211 634 344 787 543 559 847 092 832 791 293 472 227 049 173 447 161 091 984 641 506 218 719 358 585 000 246 277 013 535 747 494 007 669 399 958 730 910 170 525 590 630 077 600 441 436 031 774 503 839 165 949 891 450 761 475 402 722 851 663 923 879 697 737 617 145 359 320 256 998 499 592 523 008 183 063 225 983 851 359 360 892 551 296 068 587 930 085 285 940 021 676 973 969 275 166 230 866 485 960 286 392 077 309 304 539 272 912 831 671 788 156 382 392 236 337 059 609 952 119 838 579 828 217 923 842 928 449 354 611 572 124 270 690 847 212 133 941 509 119 702 484 611 473 447 592 848 336 411 507 461 271 079 946 538 726 482 495 661 133 550 632 147 923 552 875 782 245 911 420 750 636 815 132 387 402 194 759 891 013 227 376 564 268 462 625 414 217 749 399 038 516 896 139 290 782 991 634 719 135 365 787 961 502 030 831 900 002 932 893 816 676 262 068 567 382 427 257 784 146 946 725 041 729 247 063 708 389 400 662 997 673 250 825 119 612 534 842 571 521 364 685 768 404 465 589 682 044 911 980 574 837 770 747 230 663 213 334 466 163 216 677 768 163 055 516 824 652 326 653 066 908 342 801 128 288 986 495 263 264 542 029 539 614 265 317 141 318 410 234 388 608 365 292 110 755 928 380 904 810 563 127 483 724 608 317 888 707 576 907 555 079 153 692 476 345 665 130 533 140 238 679 665 675 462 963 724 848 782 815 642 848 074 338 278 233 451 981 429 677 942 932 192 361 995 575 901 332 467 416 107 913 046 382 878 409 114 775 090 500 293 999 888 457 388 354 910 287 962 602 504 980 488 474 078 798 341 696 865 866 713 890 260 155 755 982 697 147 737 072 844 550 515 140 958 724 041 722 008 442 943 619 928 340 638 176 038 989 529 545 105 145 985 250 213 544 573 579 331 188 775 971 039 211 227 310 098 730 653 405 031 374 578 933 278 446 482 249 668 298 540 456 388 383 621 342 369 415 307 334 387 525 011 002 329 774 818 462 860 396 589 958 581 461 561 466 195 568 525 046 098 625 699 997 467 182 014 979 891 102 352 328 760 810 989 660 097 844 127 389 495 255 710 014 853 008 211 681 724 726 402 047 184 089 258 421 984 477 039 988 913 937 074 796 668 441 509 669 337 006 952 197 036 208 991 821 879 658 123 901 476 036 635 357 690 413 093 710 987 229 608 676 800 134 903 762 664 921 328 461 009 225 596 199 876 204 145 318 008 739 261 364 236 594 838 622 925 022 635 467 617 785 103 964 089 621 049 828 095 321 476 568 768 755 854 961 797 112 899 637 057 315 848 541 725 565 337 138 455 940 987 978 042 758 260 583 866 212 082 909 943 952 650 028 090 588 819 839 979 830 044 500 113 319 936 428 298 568 567 438 204 445 815 223 806 090 181 641 022 263 537 837 780 535 041 361 862 601 946 306 305 042 383 278 069 102 424 837 221 206 991 750 632 874 352 213 941 296 424 615 587 398 719 863 563 659 670 136 180 744 703 270 152 707 558 393 567 149 617 053 259 760 312 905 086 055 430 278 231 012 991 864 412 962 660 818 616 519 720 019 828 654 230 299 357 116 533 946 185 410 818 181 848 956 641 922 045 903 511 804 516 879 228 044 829 860 231 469 741 090 437 837 182 970 841 348 001 395 652 637 510 435 994 055 218 477 183 566 197 490 157 848 680 045 431 173 821 558 348 997 509 302 059 738 032 231 859 130 746 923 029 501 458 793 338 573 227 237 762 649 342 134 758 237 351 048 959 565 628 730 049 992 043 661 859 788 550 299 493 484 530 512 998 142 553 513 722 991 055 468 631 912 488 774 548 905 398 279 644 101 481 588 879 516 448 279 054 599 751 515 212 746 469 098 052 445 882 031 315 831 180 599 475 566 379 170 799 705 662 638 295 917 666 659 617 456 555 946 508 731 780 666 710 051 898 399 564 777 569 621 554 212 358 509 129 748 278 929 183 471 395 148 915 851 886 856 491 343 879 154 542 720 304 798 393 119 391 425 447 669 661 312 274 147 022 839 759 842 008 244 137 137 088 872 293 969 637 955 106 383 459 293 930 462 961 847 271 311 563 226 372 065 637 378 938 504 814 551 470 184 251 924 357 009 186 013 110 129 092 045 142 208 725 425 115 577 211 505 267 583 871 128 994 281 761 453 099 891 242 649 756 193 654 917 279 239 007 682 104 289 516 301 671 104 834 452 877 420 714 008 961 722 353 875 951 793 315 593 112 496 626 782 199 300 170 315 981 782 099 880 361 902 612 343 817 006 406 595 656 274 293 073 684 479 375 932 666 075 838 862 291 083 842 239 869 075 456 306 066 153 546 491 827 403 910 173 410 948 852 807 827 882 617 983 419 040 264 749 502 507 044 731 397 221 561 550 077 095 917 861 185 181 713 935 689 646 463 717 553 160 606 007 472 273 101 311 042 786 349 981 817 763 442 230 768 553 377 772 619 986 108 402 656 835 983 393 894 317 852 225 252 663 175 983 526 899 683 208 360 947 976 522 645 772 711 060 111 155 705 648 200 432 294 413 918 669 502 508 998 509 727 255 573 717 064 002 423 524 484 516 525 786 582 228 048 426 117 670 279 699 963 915 079 716 648 378 405 707 641 416 443 510 379 103 514 892 451 997 663 887 360 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000 000