Stockly.com Forums  

Go Back   Stockly.com Forums > Altair 680 > Altair 680

Notices

Reply
 
Thread Tools Display Modes
  #1  
Old 07-04-2007, 11:49 PM
Grant Stockly Grant Stockly is offline
Administrator
 
Join Date: Jan 2005
Posts: 447
Default VTL-2 FACTORIALS from VTL-2 Manual Page 10

I loaded up the "FACTORIALS" program from page 15. The VTL-2 manual says that "CALCULATES FACTORIALS UNTIL IT RUNS OUT OF MEMORY FOR 1K OF MEMORY THIS IS ABOUT 208!"

I was only able to get 191! before the program quit. It took about 21 minutes of calculating and printing to reach the end.



.J FC00
OK
*=1024

OK
&=264

OK
10 A=1
20 L=2
30 :1)=1
40 I=2
50 :I)=0
60 I=I+1
70 #=L>I*50
80 ?=""
90 ?=""
100 ?=A
110 ?="! ="
120 ?=""
130 I=L+1
140 I=I-1
150 #=:I)=0*140
160 ?=:I)
170 I=I-1
180 #=I=0*220
190 ?=:I)/10
200 ?=%
210 #=170
220 A=A+1
230 I=1
240 C=0
250 X=:I)
260 :I)=A*X
270 #=:I)<X*320
280 :I)=:I)+C
290 C=:I)/100
300 :I)=%
310 I=I+1
320 #=L>I*250
330 #=C=0*80
340 L=L+1
350 #=*-&/2<L*380)End program when memory becomes low.
360 :I)=C
370 #=290
#=10


1! =

1

2! =

2

3! =

6

4! =

24

5! =

120

6! =

720

7! =

5040

8! =

40320

9! =

362880

10! =

3628800

11! =

39916800

12! =

479001600

13! =

6227020800

14! =

87178291200

15! =

1307674368000

16! =

20922789888000

17! =

355687428096000

18! =

6402373705728000

19! =

121645100408832000

20! =

2432902008176640000

21! =

51090942171709440000

22! =

1124000727777607680000

23! =

25852016738884976640000

24! =

620448401733239439360000

25! =

15511210043330985984000000

26! =

403291461126605635584000000

27! =

10888869450418352160768000000

28! =

304888344611713860501504000000

29! =

8841761993739701954543616000000

30! =

265252859812191058636308480000000

31! =

8222838654177922817725562880000000

32! =

263130836933693530167218012160000000

33! =

8683317618811886495518194401280000000

34! =

295232799039604140847618609643520000000

35! =

10333147966386144929666651337523200000000

36! =

371993326789901217467999448150835200000000

37! =

13763753091226345046315979581580902400000000

38! =

523022617466601111760007224100074291200000000

39! =

20397882081197443358640281739902897356800000000

40! =

815915283247897734345611269596115894272000000000

41! =

33452526613163807108170062053440751665152000000000

42! =

14050061177528798985431426062445115699363840000000 00

43! =

60415263063373835637355132068513997507264512000000 000

44! =

26582715747884487680436258110146158903196385280000 00000

45! =

11962222086548019456196316149565771506438373376000 0000000

46! =

55026221598120889498503054288002548929616517529600 00000000

47! =

25862324151116818064296435515361197996919763238912 0000000000

48! =

12413915592536072670862289047373375038521486354677 760000000000

49! =

60828186403426756087225216332129537688755283137921 0240000000000

50! =

30414093201713378043612608166064768844377641568960 512000000000000

51! =

15511187532873822802242430164693032110632597200169 86112000000000000

52! =

80658175170943878571660636856403766975289505440883 277824000000000000

53! =

42748832840600255642980137533893996496903437883668 13724672000000000000

54! =

23084369733924138047209274268302758108327856457180 7941132288000000000000

55! =

12696403353658275925965100847566516959580321051449 436762275840000000000000

56! =

71099858780486345185404564746372494973649797888116 8458687447040000000000000

57! =

40526919504877216755680601905432322134980384796226 602145184481280000000000000

58! =

23505613312828785718294749105150746838288623181811 42924420699914240000000000000

59! =

13868311854568983573793901972038940634590287677268 7432540821294940160000000000000

60! =

83209871127413901442763411832233643807541726063612 45952449277696409600000000000000

61! =

50758021387722479880085681217662522722600452898803 6003099405939480985600000000000000

62! =

31469973260387937525653122354950764088012280797258 232192163168247821107200000000000000

63! =

19826083154044400641161467083618981375447736902272 68628106279599612729753600000000000000

64! =

12688693218588416410343338933516148080286551617454 5192198801894375214704230400000000000000

65! =

82476505920824706667231703067854962521862585513454 37492922123134388955774976000000000000000

66! =

54434493907744306400372924024784275264429306438879 8874532860126869671081148416000000000000000

67! =

36471110918188685288249859096605464427167635314049 524593701628500267962436943872000000000000000

68! =

24800355424368305996009904185691715810473992013553 67672371710738018221445712183296000000000000000

69! =

17112245242814131137246833888127283909227054489352 0369393648040923257279754140647424000000000000000

70! =

11978571669969891796072783721689098736458938142546 42585755536286462800958278984531968000000000000000 0

71! =

85047858856786231752116764423992601028858460812079 62358864307633885886803780790176972800000000000000 00

72! =

61234458376886086861524070385274672740778091784697 32898382301496397838498722168927420416000000000000 0000

73! =

44701154615126843408912571381250511100768007002829 05015819080092370422104067183317016903680000000000 000000

74! =

33078854415193864122595302822125378214568325182093 49711706119268354112357009715654592508723200000000 00000000

75! =

24809140811395398091946477116594033660926243886570 12283779589451265584267757286740944381542400000000 0000000000

76! =

18854947016660502549879322608611465582303945353793 29335672487982961844043495537923117729972224000000 000000000000

77! =

14518309202828586963407078408630828498374037922420 83588467815746880619913491564200800652078612480000 00000000000000

78! =

11324281178206297831457521158732046228731749579488 25199004896282566883532523420076624508621317734400 0000000000000000

79! =

89461821307829752868514417153983165206980821677957 19072138680632278379906935018605333618108410101760 00000000000000000

80! =

71569457046263802294811533723186532165584657342365 75257710944505822703925548014884266894486728081408 0000000000000000000

81! =

57971260207473679858797342315781091054123572447316 25958745865049716390179693892056256184534249745940 480000000000000000000

82! =

47536433370128417484213820698940494664381329406799 33286171609340767439947348991486130071318084791671 19360000000000000000000

83! =

39455239697206586511897471180120610571436503407643 44627522435752836975156299662933487959194010377087 0906880000000000000000000

84! =

33142401345653532669993875791301312880006662862420 49487118846032383059131291716864129885722968716753 156177920000000000000000000

85! =

28171041143805502769494794422606115948005663433057 42064051019127525600261597959334510402864523409240 18275123200000000000000000000

86! =

24227095383672732381765523203441259715284870552429 38175083876449672016224974245027678946463490131946 5571660595200000000000000000000

87! =

21077572983795277172136005186993895952297837380613 56212322972511214654115727593174080683423236414793 504734471782400000000000000000000

88! =

18548264225739843911479684564554628438022096894939 93466844215809868895621840281993191001412448045018 28416633516851200000000000000000000

89! =

16507955160908461081216919262453619309839666236496 54185491352070783317103437850973939991257078760066 2729080382999756800000000000000000000

90! =

14857159644817614973095227336208257378855699612846 88766942216863704985393094065876545992131370884059 645617234469978112000000000000000000000

91! =

13520015276784029625516656875949514214758686647690 66777917417345971536707715599947656852839547504494 27751168336768008192000000000000000000000

92! =

12438414054641307255475324325873553077577991715875 41435684023958293813771098351951844304612383704134 7353107486982656753664000000000000000000000

93! =

11567725070816415747592051623062404362147532295764 13535186142281213246807121467315215203289516844845 303838996289387078090752000000000000000000000

94! =

10873661566567430802736528525678660100418680358018 28723074973744340451998694179276302291092145834154 58560865651202385340530688000000000000000000000

95! =

10329978488239059262599702099394727095397746340117 37286921225057123429398759470312487176537538542446 8563282236864226607350415360000000000000000000000

96! =

99167793487094968920957140154189380115818364865126 77954443760548384922228090914999876894760370007489 82075094738965754305639874560000000000000000000000

97! =

96192759682482119853328425949563698712343813919172 97615810447731933374561248187549880587917558907265 12612841896796781676470678323200000000000000000000 00

98! =

94268904488832477456261857430572424738096937640789 51663494238777294707070023223798882976159207729119 82360585058860846042941264756736000000000000000000 0000

99! =

93326215443944152681699238856266700490715968264381 62146859296389521759999322991560894146397615651828 62536979208272237582511852109168640000000000000000 000000

100! =

93326215443944152681699238856266700490715968264381 62146859296389521759999322991560894146397615651828 62536979208272237582511852109168640000000000000000 00000000

101! =

94259477598383594208516231244829367495623127947025 43768327889353416977599316221476503087861591808346 91162349000354959958336970630260326400000000000000 0000000000

102! =

96144667150351266092686555869725954845535590505965 94643694447140485317151302545906033149618823644513 84985595980362059157503710042865532928000000000000 000000000000

103! =

99029007164861804075467152545817733490901658221144 92483005280554699876665841622283214144107388353849 26535163859772920932228821344151498915840000000000 00000000000000

104! =

10299016745145627623848583864765044283053772454999 07218232549177688787173247528717454270987168388800 32359657041416383776951797419791755887247360000000 00000000000000000

105! =

10813967582402909005041013058003296497206461077749 02579144176636573226531909905153326984536526808240 33977639893487202965799387290781343681609728000000 0000000000000000000

106! =

11462805637347083545343473841483494287038848742413 96733892827234767620123824499462526603608718416734 76016298287096435143747350528228224302506311680000 000000000000000000000

107! =

12265202031961379393517517010387338887131568154382 94505265325141201353532492214424903465861328705906 19337439167193185603809665065204200003681753497600 00000000000000000000000

108! =

13246418194518289744998918371218325998102093606733 58065686551152497461815091591578895743130235002378 68884434300568640452114438270420536003976293777408 0000000000000000000000000

109! =

14438595832024935822048821024627975337931282031339 60291598340756222233378449834820996360011956152592 77084033387619818092804737714758384244334160217374 720000000000000000000000000

110! =

15882455415227429404253703127090772871724410234473 56320758174831844456716294818303095996013151767852 04792436726381799902085211486234222668767576239112 19200000000000000000000000000

111! =

17629525510902446638721610471070757887614095360265 65516041574063347346955087248316436555574598462315 77319604766283797891314584749719987162332009625414 5331200000000000000000000000000

112! =

19745068572210740235368203727599248834127786803497 53377966562950949028589697718114408942243550277793 66597957338237853638272334919686385621811850780464 277094400000000000000000000000000

113! =

22311927486598136465966070212187151182564399087952 21317102216134572402306358421469282104735211813906 84255691792208774611247738459245615752647391381924 63311667200000000000000000000000000

114! =

25435597334721875571201320041893352348123414960265 52301496526393412538629248600474981599398141467853 80051488643118003056822421843540001958018026175394 0817530060800000000000000000000000000

115! =

29250936934930156906881518048177355200341927204305 35146721005352424419423635890546228839307862688031 87059211939585703515345785120071002251720730101703 194015956992000000000000000000000000000

116! =

33931086844518982011982560935885732032396635556994 20770196366208812326531417633033625453597120718116 96988685849919416077801110739282362611996046917975 70505851011072000000000000000000000000000

117! =

39699371608087208954019596294986306477904063601683 22301129748464310422041758630649341780708631240196 85476762444405716811027299564960364256035374894031 5749184568295424000000000000000000000000000

118! =

46845258497542906565743123628083841643926795049986 20315333103187886298009275184166223301236184863432 28862579684398745837012213486653229822121742374957 258403779058860032000000000000000000000000000

119! =

55745857612076058813234317117419771556272886109483 58175246392793584694631037469157805728471059987484 42346469824434507546044534049117343488324873426199 13750049708004343808000000000000000000000000000

120! =

66895029134491270575881180540903725867527463331380 29810295671352301633557244962989366874165271984981 30815763789321409055253440858940812185989848111438 9650005964960521256960000000000000000000000000000

121! =

80942985252734437396816228454493508299708230630970 16070457762336284976604266405217133917739979101827 38287074185078904956856663439318382745047716214841 14765072176022307209216000000000000000000000000000 0

122! =

98750442008336013624115798714482080125644041369783 59605958470050267671457205014364903379642774504229 40710230505796264047365129395968426948958213782106 20013388054747214795243520000000000000000000000000 000

123! =

12146304367025329675766243241881295855454217088483 38231532891816182923589236216766883115696061264020 21707358352212940477825910915704116514721860295199 06261646730733907419814952960000000000000000000000 000000

124! =

15061417415111408797950141619932806860763229189719 39407100785852066825250652908790935063463115967385 06917124356744046192504129535473104478255106766046 83764441946110045200570541670400000000000000000000 00000000

125! =

18826771768889260997437677024916008575954036487149 24258875982315083531563316135988668829328894959231 33646405445930057740630161919341380597818883457558 54705552432637556500713177088000000000000000000000 0000000000

126! =

23721732428800468856771473051394170805702085973808 04566183737717005249769778331345722724954407648631 48394470861871872753194004018370139553251793156523 76928996065123321190898603130880000000000000000000 000000000000

127! =

30126600184576595448099770775270596923241649186736 21799053346900596667207618480809067860692097713761 98460977994577278396556385103330077232629777308785 18699825002706617912441225976217600000000000000000 00000000000000

128! =

38562048236258042173567706592346364061749310959022 35902788284032763734025751655435606861685885073615 34030051833058916347592172932262498857766114955245 03935776003464470927924769249558528000000000000000 0000000000000000

129! =

49745042224772874403902341504126809639656611137138 84314596886402265216893219635511932851574791744963 78898766864646002088393903082618623526518288292266 10077151044469167497022952331930501120000000000000 000000000000000000

130! =

64668554892204736725073043955364852531553594478280 49608975952322944781961185526165512707047229268452 92568396924039802714912074007404210584473774779945 93100296357809917746129838031509651456000000000000 00000000000000000000

131! =

84715806908788205109845687581527956816335208766547 44987758497543057664369153039276821646231870341673 33264599970492141556534816949699515865660644961729 16961388228730992247430087821277643407360000000000 0000000000000000000000

132! =

11182486511960043074499630760761690299756247557184 26338384121675683611696728201184540457302606885100 87990927196104962685462595837360336094267205134948 25038903246192490976660771592408648929771520000000 0000000000000000000000000

133! =

14872707060906857289084508911813048098675809251055 07030050881828659203556648507575438808212467157184 17027933170819600371665252463689247005375382829481 17301741317436012998958826217903503076596121600000 000000000000000000000000000

134! =

19929427461615188767373241941829484452225584396413 79420268181650403332765909000151088003004705990626 78817430448898264498031438301343590987203012991504 77184333365364257418604827131990694122638802944000 00000000000000000000000000000

135! =

26904727073180504835953876621469804010504538935158 62217362045228044499233977150203968804056353087346 16403531106012657072342441706813847832724067538531 44198850043241747515116516628187437065562383974400 0000000000000000000000000000000

136! =

36590428819525486576897272205198933454286172951815 72615612381510140518958208924277397573516640198790 78308802304177213618385720721266833052504731852402 76110436058808776620558462614334914409164842205184 000000000000000000000000000000000

137! =

50128887482749916610349262921122538832372056943987 54483388962668892510972746226260034675717797072343 37283059156722782657188437388135561281931482637791 78271297400568023970165093781638832740555833821102 08000000000000000000000000000000000

138! =

69177864726194884922281982831149103588673438582702 81187076768483071665142389792238847852490559959833 85450621636277440066920043595627074569065446040152 66014390412783873078827829418661589181967050673120 8704000000000000000000000000000000000

139! =

96157231969410890041971956135297253988256079629956 90850036708191469614547921811211998514961878344169 05776364074425641693018860597921633651000969995812 19760002673769583579570682891939608962934200435638 009856000000000000000000000000000000000

140! =

13462012475717524605876073858941615558355851148193 96719005139146805746036709053569679792094662968183 66808690970419589837022640483709028711140135799413 70766400374327741701139895604871545254810788060989 321379840000000000000000000000000000000000

141! =

18981437590761709694285264141107677937281750118953 49373797246196996101911759765533248506853474785138 97200254268291621670201923082029730482707591477173 32780624527802115798607252802868878809283211165994 94314557440000000000000000000000000000000000

142! =

26953641378881627765885075080372902670940085168913 96110792089599734464714698867057212879731934194897 34024361060974102771686730776482217285444779897586 12548486829479004434022298980073807909182159855712 8192667156480000000000000000000000000000000000

143! =

38543707171800727705215657364933250819444321791546 96438432688127620284542019379891814418016665898703 19654836317192966963512025010369570718186035253548 15944336166154976340651887541505545310130488593669 331551403376640000000000000000000000000000000000

144! =

55502938327393047895510546605503881179999823379827 62871343070903773209740507907044212761943998894132 60302964296757872427457316014932181834187890765109 34959844079263165930538718059767985246587903574883 83743402086236160000000000000000000000000000000000

145! =

80479260574719919448490292577980627710999743900750 06163447452810471154123736465214108504818798396492 27439298230298915019813108221651663659572441609408 55691773914931590599281141186663578607552460183581 56427933025042432000000000000000000000000000000000 00

146! =

11749972043909108239479582716385171645805962609509 50899863328110328788502065523921259841703544565887 87206137541623641592892713800361142894297576474973 64930998991580012227495046613252882476702659186802 90838478221656195072000000000000000000000000000000 00000

147! =

17272458904546389112034986593086202319334765035978 97822799092322183319098036320164251967304210511855 17193022186186753141552289286530880054617437418211 26448568517622617974417718521481737240752909004600 27532562985834606755840000000000000000000000000000 0000000

148! =

25563239178728655885811780157767579432615452253248 88777742656636831312265093753843092911610231557545 65445672835556394649497388144065702480833807378952 67143881406081474602138223411792971116314305326808 40748193219035217998643200000000000000000000000000 000000000

149! =

38089226376305697269859552435073693354597023857340 84278836558388878655274989693226208438299245020743 02514052524979028027751108334657896696442372994639 48044383295061397157185952883571526963308314936944 52714807896362474817978368000000000000000000000000 00000000000

150! =

57133839564458545904789328652610540031895535786011 26418254837583317982912484539839312657448867531114 53771078787468542041626662501986845044663559491959 22066574942592095735778929325357290444962472405416 79072211844543712226967552000000000000000000000000 0000000000000

151! =

86272097742332404316231886265441915448162259036877 00891564804750810154197851655157362112747789971982 95194328969077498482856260378000136017441974832858 42320528163314064561026183281289508571893333332179 35399039885261005462721003520000000000000000000000 000000000000000

152! =

13113358856834525456067246712347171148120663373605 30535517850322123143438073451583919041137664075741 40869538003299779769394151577456020674651180174594 48032720280823737813275979858756005302927786666491 26180654062559672830333592535040000000000000000000 000000000000000000

153! =

20063439050956823947782887469891171856624614961616 11719342310992848409460252380923396132940626035884 35530393145048663047173051913507711632216305667129 55490062029660318854312249183896688113479513599731 63056400715716299430410396578611200000000000000000 00000000000000000000

154! =

30897696138473508879585646703632404659201907040888 82047787158928986550568788666622030044728564095261 90716805443374941092646499946801875913613110727379 51454695525676891035640863743200899694758450943586 71106857102203101122832010731061248000000000000000 0000000000000000000000

155! =

47891429014633938763357752390630227221762955913377 67174070096339929153381622433264146569329274347655 95611048437231158693602074917542907666100321627438 24754778064799181105243338801961394526875598962559 40215628508414806740389616633144934400000000000000 000000000000000000000000

156! =

74710629262828944470838093729383154465950211224869 16791549350290289479275330995892068648153667982343 29153235562080607562019236871366935959116501738803 66617453781086722524179608531059775461925934381592 66736380473127098515007801947706097664000000000000 00000000000000000000000000

157! =

11729568794264144281921580715513155251154183162304 45936273247995575448246226966355054777760125873227 89677057983246655387237020188804608945581290772992 17558940243630615436296198539376384747522371697910 04877611734280954466856224905789857333248000000000 00000000000000000000000000000

158! =

18532718694937347965436097530510785296823609396441 04579311731833009208229038606840986548860998879700 07689751613529715511834491898311282134018439421327 63743125584936372389347993692214687901085347282697 87706626540163908057632835351147974586531840000000 0000000000000000000000000000000

159! =

29467022724950383265043395073512148621949538940341 26281105653614484641084171384877168612688988218723 12226705065512247663816842118314938593089318679910 94351569680048832099063309970621353762725702179489 62453536198860613811636208208325279592585625600000 000000000000000000000000000000000

160! =

47147236359920613224069432117619437795119262304546 02049769045783175425734674215803469780302381149956 99562728104819596262106947389303901748942909887857 50962511488078131358501295952994166020361123487183 39925657918176982098617933133320447348137000960000 00000000000000000000000000000000000

161! =

75907050539472187290751785709367294850142012310319 09300128163710912435432825487443586346286833651430 76295992248759549981992185296779281815798084919450 59049643495805791487187086484320607292781408814365 27280309248264941178774872344645920230500571545600 0000000000000000000000000000000000000

162! =

12296942187394494341101789284917501765723005994271 69306620762521167814540117728965860988098467051531 78359950744299047097082734018078243654159289756950 99566042246320538220924308010459938381430588227927 17419410098218920470961529319832639077341092590387 2000000000000000000000000000000000000000

163! =

20044015765453025775995916534415527878128499770662 85969791842909503537700391898214353410600501293996 80726719713207446768244856449467537156279642303830 12292648861502477300106622057049699561731858811521 29393638460096840367667292791327201696065980922331 136000000000000000000000000000000000000000

164! =

32872185855342962272633303116441465720130739623887 08990458622371585801828642713071539593384822122154 76391820329660212699921564577126760936298613378281 40159944132864062772174860173561507281240248450894 92205567074558818202974360177776610781548208712623 06304000000000000000000000000000000000000000

165! =

54239106661315887749844950142128418438215720379413 69834256726913116573017260476568040329084956501555 36046503543939350954870581552259155544892712074164 31263907819225703574088519286376487014046409943976 62139185673022050034907694293331407789554544375828 0540160000000000000000000000000000000000000000

166! =

90036917057784373664742617235933174607438095829826 73924866166675773511208652391102946946281027792581 89837195882939322585085165376750198204521902043112 75898086979914667932986942015384968443317040507001 19151048217216603057946772526930136930660543663874 569666560000000000000000000000000000000000000000

167! =

15036165148649990402012017078400840159442162003581 06545452649834854176371844949314192140028931641361 17702811712450866871709222617917283100155157641199 83074980525645749544808819316569289730033945764669 19898225052275172710677111011997332867420310791867 05313431552000000000000000000000000000000000000000 0

168! =

25260757449731983875380188691713411467862832166016 18996360451722555016304699514847842795248605157486 77740723676917456344471493998101035608260664837215 71565967283084859235278816451836406746457028884644 25429018087822290153937546500155519217266122130336 64926565007360000000000000000000000000000000000000 000

169! =

42690680090047052749392518888995665380688186360567 36103849163411117977554942180092854323970142716152 65381823013990501222156824856790750177960523574894 55946484708413412107621199803603527401512378815048 78975040568419670360154453585262827477179746400268 93725894862438400000000000000000000000000000000000 00000

170! =

72574156153079989673967282111292631147169916812964 51376543577798900561843401706157852350749242617459 51149099123783852077666602256544275302532890077320 75109024004302800582956039666125996582571043985582 94257568966313439612262571094946806711205568880457 19334021266145280000000000000000000000000000000000 0000000

171! =

12410180702176678234248405241031039926166055775016 93185388951803611996075221691752992751978120487585 57646495950167038705280988985869071076733124203221 84843643104735778899685482782907545415619648521534 68318044293239598173696899657235903947616152278558 18006117636510842880000000000000000000000000000000 0000000000

172! =

21345510807743886562907257014573388673005615933029 12278868997102212633249381309815147533402367238647 19151973034287306573083301055694802251980973629541 57931066140145539707459030386600978114865795457039 65507036184372108858758667410445754789899781919120 06970522334798649753600000000000000000000000000000 000000000000

173! =

36927733697396923753829554635211962404299715564140 38242443364986827855521429665980205232786095322859 64132913349317040371434110826352007895927084379106 93220744422451783693904122568819692138717826140678 60327172598963748325652494620071155786526622720077 72059003639201664073728000000000000000000000000000 00000000000000

174! =

64254256633470647331663425065268814583481505081604 26541851455077080468607287618805557105047805861775 77591269227811650246295352837852493738913126819646 06204095295066103627393173269746264321369017484780 76969280322196922086635340638923811068556323532935 23382666332210895488286720000000000000000000000000 0000000000000000

175! =

11244494910857363283041099386422042552109263389280 74644824004638489082006275333290972493383366025810 76078472114867038793101686746624186404309797193438 06085716676636568134793805322205596256239578059836 63469624056384461365161184611811666936997356618263 66591966608136906710450176000000000000000000000000 0000000000000000000

176! =

19790311043108959378152334920102794891712303565134 11374890248163740784331044586592111588354724205426 93898110922165988275858968674058568071585243060450 98710861350880359917237097367081849410981657385312 47706538339236652002683684916788533809115347648144 05201861230320955810392309760000000000000000000000 000000000000000000000

177! =

35028850546302858099329632808581946958330777310287 38133555739249821188265948918268037511387861843605 68199656332233799248270374553083665486705880216998 24718224591058237053509662339734873457437533572003 08440572860448874044750122302715704842134165337214 97207294377668091784394388275200000000000000000000 00000000000000000000000

178! =

62351353972419087416806746399275865585828783612311 53877729215864681715113389074517106770270394081618 11395388271376162661921266704488924566336466786256 87998439772083661955247198964728074754238809758165 49024219691598995799655217698833954618998814300242 65028983992249203376222011129856000000000000000000 0000000000000000000000000

179! =

11160892361063016647608407605470379939863352266603 76544113529639778027005296644338562111878400540609 64239774500576333116483906740103517497374227554739 98151720719202975489989248614686325381008746946711 62275335324796220248138283968091277876800787759743 43440188134612607404343739992244224000000000000000 0000000000000000000000000000

180! =

20089606249913429965695133689846683891754034079886 77779404353351600448609533959809411801381120973097 35631594101037399609671032132186331495273609598531 96673097294565355881980647506435385685815744504080 92095603584633196446648911142564300178241417967538 18192338642302693327818731986039603200000000000000 000000000000000000000000000000

181! =

36362187312343308237908191978622497844074801684595 06780721879566396811983256467255035360499828961306 21493185322877693293504568159257260006445233373342 85978306103163294146384971986648048091326497552386 46693042488186085568434529168041383322616966521244 10928132942567874923351904894731681792000000000000 00000000000000000000000000000000

182! =

66179180908464820992992909401092946076216139065963 02340913820810842197809526770404164356109688709577 31117597287637401794178314049848213211730324739484 00480517107757195346420649015699447526214225545343 36981337328498675734550843085835317647162879068664 27889201955473532360500466908411660861440000000000 0000000000000000000000000000000000

183! =

12110790106249062241717702420400009131947553449071 23328387229208384122199143398983962077168073033852 64794520303637644528334631471122223017746649427325 57287934630719566748394978769872998897297203274797 83667584731115257659422804284707863129430806869565 56303723957851656421971585444239333937643520000000 0000000000000000000000000000000000000

184! =

22283853795498274524760572453536016802783498346291 06924232501743426784846423854130490221989254382288 87221917358693265932135721906864890352653834946279 05409799720524002817046760936566317971026854025628 01948355905252074093337959883862468158152684640000 63598852082447047816427717217400374445264076800000 000000000000000000000000000000000000000

185! =

41225129521671807870807059039041631085149471940638 47809830128225339551965884130141406910680120607234 41360547113582541974451085527700047152409594650616 25008129482969405211536507732647688246399679947411 83604458424716337072675225785145566092582466584001 17657876352527038460391276852190692723738542080000 00000000000000000000000000000000000000000

186! =

76678740910309562639701129812617433818378017809587 56926284038499131566656544482063016853865024329456 00930617631263528072479019081522087703481846050146 22515120838323093693457904382724700138303404702186 01504292669972386955175919960370752932203387846242 18843650015700291536327774945074688466153688268800 0000000000000000000000000000000000000000000

187! =

14338924550227888213624111274959460124036689330392 87545215115199337602964773818145784151672759549608 27374025497046279749553576568244630400551105211377 34410327596766418520676628119569518925862736679308 78481302729284836360617897032589330798322033527247 28923762552935954517293293914728966743170739706265 6000000000000000000000000000000000000000000000

188! =

26957178154428429841613329196923785033188975941138 60585004416574754693573774778114074205144787953263 55463167934447005929160723948299905153036077797389 40691415881920866818872060864790695580621944957100 51544849131055492357961646421267941900845423031224 90376673599519594492511392559690457477160990647779 328000000000000000000000000000000000000000000000

189! =

50949066711869732400649192182185953712727164528751 96505658347326286370854434330635600247723649231668 11825387396104841206113768262286820739238187037065 97906776016830438287668195034454414647375475968919 97419764857694880556547511736196410192597849529015 06811913103092033590846531937814964631834272324302 92992000000000000000000000000000000000000000000000

190! =

96803226752552491561233465146153312054181612604628 73360750859919944104623425228207640470674933540169 42468236052599198291616159698344959404552555370425 36022874431977832746569570565463387830013404340947 95097553229620273057440272298773179365935914105128 62942634895874863822608410681848432800485117416175 56684800000000000000000000000000000000000000000000 00

191! =

18489416309737525888195591842915282602348688007484 08811903414244709323983074218587659329898912306172 36011433086046446873698686502383887246269538075751 24380369016507766054594787978003507075532560229121 05863632666857472153971092009065677258893759594079 56822043265112098990118206440233050664892657426489 53326796800000000000000000000000000000000000000000 00000
OK

Last edited by Grant Stockly; 07-04-2007 at 11:55 PM.
Reply With Quote
  #2  
Old 07-06-2007, 10:03 PM
sje sje is offline
Member
 
Join Date: Nov 2006
Posts: 62
Default

I'm reminded of an article in _Byte_ from the Early Days when it was still a worthwhile read. Some clever coder had written a couple of similar programs. The first calculated the square root of two and the second did the constant e. Both generated about 20,000 decimal digits and I seem to recall that this was on an Apple II (MOS 6502) with 32 KB RAM.

A more interesting hack done about the same time and also appearing in _Byte_ was the Pascal compiler written in Basic. The author used the function definition semantics (multiple lines and recursion enabled) peculiar to Northstar Basic to write a recursive descent parser.
Reply With Quote
  #3  
Old 07-08-2007, 11:31 PM
Grant Stockly Grant Stockly is offline
Administrator
 
Join Date: Jan 2005
Posts: 447
Default

I had to force myself to stop punishing the poor Altair 680.

Using a 16k memory card in the Altair 680 I started this factorial program at 2:01:40AM. I decided to stop it at 1000! (monk would be proud) at 3:20:25PM. Thats 13 hours 19 minutes and 45 seconds!

Frank McCoy has VTL running in a DOS box on his computer. He said it took a few seconds to get past 2000!. He said that with 16k the Altair 680 should eventually get to 10000. Next time I go on a vacation I might leave the 680 on.

Here is the LAST calculation it did, "1000!" 2539 at digits long!

Code:
1000! =

11327540183865350031449107618104552185318635141953221925465627459865438317224865
14264102946194907487358999960470942155413395309592814530776374310626531916517291
05737275648135250510819975475590558637717680102710609424203574865979447650275422
01668712456154943288674048122100547714716215109665077047944093198723012084387497
14843017100410254155775248196125202422068305900971503154918934310898564317609812
71873000409426442651971204955099362322431285834580306226123658606265690464268672
83030690312196061630660210391100710057447033409874842360216876856803607327204170
27550222975894340635171064981051057283163682749027048653758582772111058336909440
75934312196689768589503688647722871793957646567450596063749096792101920769564132
64642081065106289574057086109180817042280404706106464126323480128669700614975921
20657007345784757005809677800099800729568927632734575753205661621105516092986310
49929906408256024407550360855975923365507195629714604287195225352030164250065021
42264307532595140564746009203171950921532297083412521934369566743684055127247126
24604316993514807486730511751182103295549771768481188603321223272897125073701209
68411393303754758888510021157007792556489076904161511004682232009082171527189960
15167424715699073665541147798154901514609127810060161125287084051396376513176961
65401550794425646365260172035261216749595526792205049907051190933735972557015040
79030060526554310372753010246042148096388575193169263549212302657732272971465975
63547084700692346260048575515283271249262253126095912645188034608128790066499023
15544641618004010609859870007586364590047404637078371107009705648503372556529007
98990472285611485521563672825732859845073602063036160071108144966767905335120822
50273884711856625010524450875830908196500968038451069209511679777106354570746800
37646681762106550984428529861127749769613574855225605170154924133104461148932614
62960508900327663551952384546016945612362075061757265007764824364953893097067257
65757059198991346611066673201632723322158429550106413914342152319217851886202027
40448994044024136381433985433521955292857240030769604602347513060867516337971286
05605898229308642564451779987259470576049393249879757137745660089463628686965896
17073100506171452792968570934344930486664422646231161958028172982975353430761280
87812546637701362220004999304280419772005936956487358154115362865519656304640000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000
Reply With Quote
  #4  
Old 07-09-2007, 02:32 PM
sje sje is offline
Member
 
Join Date: Nov 2006
Posts: 62
Default 1000!

Your value of 1000! does not agree with the value produced by bc (unix basic calculator utility).
Code:
define factorial(n){
        auto i,s
        s=1
        for(i=1;i<=n;i++)s=s*i
        return(s)
}

factorial(10)
3628800

factorial(100)
93326215443944152681699238856266700490715968264381621468592963895217\
59999322991560894146397615651828625369792082722375825118521091686400\
0000000000000000000000

factorial(1000)
40238726007709377354370243392300398571937486421071463254379991042993\
85123986290205920442084869694048004799886101971960586316668729948085\
58901323829669944590997424504087073759918823627727188732519779505950\
99527612087497546249704360141827809464649629105639388743788648733711\
91810458257836478499770124766328898359557354325131853239584630755574\
09114262417474349347553428646576611667797396668820291207379143853719\
58824980812686783837455973174613608537953452422158659320192809087829\
73084313928444032812315586110369768013573042161687476096758713483120\
25478589320767169132448426236131412508780208000261683151027341827977\
70478463586817016436502415369139828126481021309276124489635992870511\
49649754199093422215668325720808213331861168115536158365469840467089\
75602900950537616475847728421889679646244945160765353408198901385442\
48798495995331910172335555660213945039973628075013783761530712776192\
68490343526252000158885351473316117021039681759215109077880193931781\
14194545257223865541461062892187960223838971476088506276862967146674\
69756291123408243920816015378088989396451826324367161676217916890977\
99119037540312746222899880051954444142820121873617459926429565817466\
28302955570299024324153181617210465832036786906117260158783520751516\
28422554026517048330422614397428693306169089796848259012545832716822\
64580665267699586526822728070757813918581788896522081643483448259932\
66043367660176999612831860788386150279465955131156552036093988180612\
13855860030143569452722420634463179746059468257310379008402443243846\
56572450144028218852524709351906209290231364932734975655139587205596\
54228749774011413346962715422845862377387538230483865688976461927383\
81490014076731044664025989949022222176590433990188601856652648506179\
97023561938970178600408118897299183110211712298459016419210688843871\
21855646124960798722908519296819372388642614839657382291123125024186\
64935314397013742853192664987533721894069428143411852015801412334482\
80150513996942901534830776445690990731524332782882698646027898643211\
39083506217095002597389863554277196742822248757586765752344220207573\
63056949882508796892816275384886339690995982628095612145099487170124\
45164612603790293091208890869420285106401821543994571568059418727489\
98094254742173582401063677404595741785160829230135358081840096996372\
52423056085590370062427124341690900415369010593398383577793941097002\
77534720000000000000000000000000000000000000000000000000000000000000\
00000000000000000000000000000000000000000000000000000000000000000000\
00000000000000000000000000000000000000000000000000000000000000000000\
0000000000000000000000000000000000000000000000000000
Reply With Quote
  #5  
Old 03-02-2008, 03:09 PM
sje sje is offline
Member
 
Join Date: Nov 2006
Posts: 62
Default

I did a little searching and found several sites that agree with my 1000! calculation. Perhaps the earlier 6800 program ran out of memory at some point.
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT. The time now is 05:03 PM.


Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2024, vBulletin Solutions, Inc.