a$="1"
for i%=1 to 2100
    a$=X$(a$,str$(i%))
next
    print a$
end

function X$(a$,b$)
  a$=ltrim$(rtrim$(a$))
  b$=ltrim$(rtrim$(b$)) 
  la%=len(a$)
  lb%=len(b$)
  s$=space$(la%+lb%)
  for i%=la% to 1 step -1
    for j%=lb% to 1 step -1
      z%=val(mid$(a$,i%,1))*val(mid$(b$,j%,1))
      for k%=i%+j% to 1 step -1
        z%=z%+val(mid$(s$,k%,1))
        mid$(s$,k%,1)=chr$((z% mod 10)+48)
        z%=z%\10
        if z%=0 then exit for
  next k%,j%,i%
  X$=ltrim$(s$)
end function

这是第三题的程序,得数放在下一贴.
至于,怎样解释嘛......
很抱歉(我只能说出这一句了)

2100!(阶乘) = 5038761006907546328672232310445857290331699556605406811693809043303422168318379108567876952368791331715026419474805785574874607008962382570214703286203476441088541639805012057668425981286090231256238258862927681801577209239032244391857408986805328167594477116345769985495767655594622513812757646034971363266176198162983977399745305564914941398633476604933858335682955187514044763922862647497744559304860452947746871018530479173488831006657815699297209540164702640331321658428492043865605758701380553708045086002329722127103453282132450640400696972511973367121607673879994261566133286124560239432263562855232876287604054582795170282112626823759600690040369993203392644738170074834851969115954682351023509225853148083986117208708302024476594680400344343427841365430944843875539790889968506651369512561433416092922296057212668905439997646079041235901288085857961448057068626159794262983145444279775561913137122521842056464192588055542606854044619657566837450314255908274577568485307213429940987365234809245282587112600946265954703957636426378073899303173168026113004921219155883918458677686730272727404910800069740491239051107939431483999039523232281245875817699327766798438527846489233951725773906613924099988573567666895913344313250498722007665308465874456344011791106085024812699427425341548934286806841710395695978246338799895904139203069654773593094916059954914258080470312626742045768866769138431799877881583680218567470294957222961889266578669120315997140641195705394198364927942374860450547402536449781428826431957411495250866000813881193253124930337827424217068720620518711723517841507948417577006300550584063868481266328212841780706773173075262201815574831803726697095844715961008045059609779472136679043297433071730526850354758125128542014215668272715557173975353237436510578119021317795741834359219501255185372135239586521608139893666130808187273416620188198859207346513983077968670562254951867467093115511102488576110544573977226412720363908833051101309687979458814043890372236925823636857125512436540389932073599429161175400514859017030806487694403600272608255389255976322708725494154905367184527827069724844773276168573731350181898900876557379963620977157232017890695517383274419456029261444264788771700991058345937547773856392308843397127063485955466676188546817639735296595736896392947958522612005557149205597629773109942407886742562103541777454430989235722617093632687696081751292365386190035129323863671451447166102931225845364990868653938134084832646898374188832979087421932968739391060834142706533285799247996788042576634663898871419663741048775702493960388327795948369213565897882367634552086476805107965114459177982992315706871309249766729098815728640565632542041562431412712309402214092028258535701364596854385475977440047064751142993655773405556693277880347148263472889667216216182692748144956561352508665437993088192727287246025224776713278344546140652071267235105292982018773373205343289552840040801356645423921111701685694530690136958310454397304307185657907533836405401964673061542586848614041538166845448471071133934663379148334143055690315079939604637927575585082131481322013639532019610742953520525713831106728702866647347647585633780528437041844550468359469441685913290886887294419603659764185628860179111730564440974380562487570767525563851091935958959801335464650823115657492060835634070000279274510019663043788020149922513479270860067278454816090279326942739466830899605575902595644526349775936320956168464415630755389444589142036181391533039137696189843677489103522422684390705801230902185988985923874797109550008371231990027328229672744530963208377993148404498342543023085321649819155624047445808933298618176641400378762848630235497761775788425710767421387208141838247874588221624142441197347563503811388171583398687386436056485421280965402051609739544303932276326037893176104070138258214130032964928994714765644252393593931961135086832311885734160853957550314697753941526786554928338668956141304138935491046790610575601691600575811327063171630296067119629871362086813884930610588758645535324709500382017278448825211680233865618247706384898722021124730186590157825314502837825722965122651016036055864951824034952176082817871966173942758034069634379633350801310232315049667277192096597299116312389954116380076373259576281076293439990026746521408213900554076740509686917536849101226469831071896876232361270193122776599277709777355078325434424608524897160798074460786256405961453103802199409377143807493688531027391818151522114517031547331503624155816302345169659733972554535017298644658838621392433360173011155102965788616990185281633624223941427324589423750264854546507746932325290936871193863033921622652801304328920800828496266147458163779917228774731231803439216722611840048271941493860923908545100877948609872865325804685569549577065803433926122895414326552004747363266380392873244202903353614882888064318240597434059956617457938948329898863451800024615923648863935253313283341068844861681302062716119241405519603415010845602957507214032831539533504916224417324871812894843466969676496618940135672022187053731354194162684444436747164690433303651042598112771048502574134804288050490754119501078175544278664362851094396036301627387979253030168721951251073419185153194336393164705361055009774039091874435833399229344610363296338743778817086021146171221326175486757305765972486747888964148216581805595898999669023736327199864904203578261871018850418658310345525500432824271458727402935892935300444023849650649342431342253327033928091467323097323832006491830585470969632776517240021338964720865773812444162949120000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000

你写的太复杂了~！~！~
有简单的方法啊

愿闻其详

高精度乘法......算了多长时间? 1秒?