Anonymous user
Isqrt (integer square root) of X: Difference between revisions
added Ol
Drkameleon (talk | contribs) |
(added Ol) |
||
Line 1,580:
71 1,004,525,211,269,079,039,999,221,534,496,697,502,180,541,686,174,722,466,474,743 1,002,260,051,717,656,279,450,068,093,686
73 49,221,735,352,184,872,959,961,855,190,338,177,606,846,542,622,561,400,857,262,407 7,015,820,362,023,593,956,150,476,655,802</pre>
=={{header|Ol}}==
<lang scheme>
(print "Integer square roots of 0..65")
(for-each (lambda (x)
(display (isqrt x))
(display " "))
(iota 66))
(print)
(print "Integer square roots of 7^n")
(for-each (lambda (x)
(print "x: " x ", isqrt: " (isqrt x)))
(map (lambda (i)
(expt 7 i))
(iota 73 1)))
(print)
</lang>
{{Out}}
<pre>
Integer square roots of 0..65
0 1 1 1 2 2 2 2 2 3 3 3 3 3 3 3 4 4 4 4 4 4 4 4 4 5 5 5 5 5 5 5 5 5 5 5 6 6 6 6 6 6 6 6 6 6 6 6 6 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8
Integer square roots of 7^n
x: 7, isqrt: 2
x: 49, isqrt: 7
x: 343, isqrt: 18
x: 2401, isqrt: 49
x: 16807, isqrt: 129
x: 117649, isqrt: 343
x: 823543, isqrt: 907
x: 5764801, isqrt: 2401
x: 40353607, isqrt: 6352
x: 282475249, isqrt: 16807
x: 1977326743, isqrt: 44467
x: 13841287201, isqrt: 117649
x: 96889010407, isqrt: 311269
x: 678223072849, isqrt: 823543
x: 4747561509943, isqrt: 2178889
x: 33232930569601, isqrt: 5764801
x: 232630513987207, isqrt: 15252229
x: 1628413597910449, isqrt: 40353607
x: 11398895185373143, isqrt: 106765608
x: 79792266297612001, isqrt: 282475249
x: 558545864083284007, isqrt: 747359260
x: 3909821048582988049, isqrt: 1977326743
x: 27368747340080916343, isqrt: 5231514822
x: 191581231380566414401, isqrt: 13841287201
x: 1341068619663964900807, isqrt: 36620603758
x: 9387480337647754305649, isqrt: 96889010407
x: 65712362363534280139543, isqrt: 256344226312
x: 459986536544739960976801, isqrt: 678223072849
x: 3219905755813179726837607, isqrt: 1794409584184
x: 22539340290692258087863249, isqrt: 4747561509943
x: 157775382034845806615042743, isqrt: 12560867089291
x: 1104427674243920646305299201, isqrt: 33232930569601
x: 7730993719707444524137094407, isqrt: 87926069625040
x: 54116956037952111668959660849, isqrt: 232630513987207
x: 378818692265664781682717625943, isqrt: 615482487375282
x: 2651730845859653471779023381601, isqrt: 1628413597910449
x: 18562115921017574302453163671207, isqrt: 4308377411626977
x: 129934811447123020117172145698449, isqrt: 11398895185373143
x: 909543680129861140820205019889143, isqrt: 30158641881388842
x: 6366805760909027985741435139224001, isqrt: 79792266297612001
x: 44567640326363195900190045974568007, isqrt: 211110493169721897
x: 311973482284542371301330321821976049, isqrt: 558545864083284007
x: 2183814375991796599109312252753832343, isqrt: 1477773452188053281
x: 15286700631942576193765185769276826401, isqrt: 3909821048582988049
x: 107006904423598033356356300384937784807, isqrt: 10344414165316372973
x: 749048330965186233494494102694564493649, isqrt: 27368747340080916343
x: 5243338316756303634461458718861951455543, isqrt: 72410899157214610812
x: 36703368217294125441230211032033660188801, isqrt: 191581231380566414401
x: 256923577521058878088611477224235621321607, isqrt: 506876294100502275687
x: 1798465042647412146620280340569649349251249, isqrt: 1341068619663964900807
x: 12589255298531885026341962383987545444758743, isqrt: 3548134058703515929815
x: 88124787089723195184393736687912818113311201, isqrt: 9387480337647754305649
x: 616873509628062366290756156815389726793178407, isqrt: 24836938410924611508707
x: 4318114567396436564035293097707728087552248849, isqrt: 65712362363534280139543
x: 30226801971775055948247051683954096612865741943, isqrt: 173858568876472280560953
x: 211587613802425391637729361787678676290060193601, isqrt: 459986536544739960976801
x: 1481113296616977741464105532513750734030421355207, isqrt: 1217009982135305963926677
x: 10367793076318844190248738727596255138212949486449, isqrt: 3219905755813179726837607
x: 72574551534231909331741171093173785967490646405143, isqrt: 8519069874947141747486745
x: 508021860739623365322188197652216501772434524836001, isqrt: 22539340290692258087863249
x: 3556153025177363557255317383565515512407041673852007, isqrt: 59633489124629992232407216
x: 24893071176241544900787221684958608586849291716964049, isqrt: 157775382034845806615042743
x: 174251498233690814305510551794710260107945042018748343, isqrt: 417434423872409945626850517
x: 1219760487635835700138573862562971820755615294131238401, isqrt: 1104427674243920646305299201
x: 8538323413450849900970017037940802745289307058918668807, isqrt: 2922040967106869619387953625
x: 59768263894155949306790119265585619217025149412430681649, isqrt: 7730993719707444524137094407
x: 418377847259091645147530834859099334519176045887014771543, isqrt: 20454286769748087335715675381
x: 2928644930813641516032715844013695341634232321209103400801, isqrt: 54116956037952111668959660849
x: 20500514515695490612229010908095867391439626248463723805607, isqrt: 143180007388236611350009727669
x: 143503601609868434285603076356671071740077383739246066639249, isqrt: 378818692265664781682717625943
x: 1004525211269079039999221534496697502180541686174722466474743, isqrt: 1002260051717656279450068093686
x: 7031676478883553279994550741476882515263791803223057265323201, isqrt: 2651730845859653471779023381601
x: 49221735352184872959961855190338177606846542622561400857262407, isqrt: 7015820362023593956150476655802
</pre>
=={{header|Pascal}}==
| |||