aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

September 2017 Update

Browse source
This commit is contained in:
Ingy döt Net 2017-09-23 10:01:46 +02:00
parent bba7bfd280
commit ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/Arithmetic-geometric-mean/Nim/arithmetic-geometric-mean-1.nim
View file

@ -11,4 +11,4 @@ proc agm(a, g: float,delta: float = 1.0e-15): float =
aOld = aNew
result = aOld
echo ($agm(1.0,1.0/sqrt(2)))
echo $agm(1.0,1.0/sqrt(2.0))

2
Task/Arithmetic-geometric-mean/Nim/arithmetic-geometric-mean-2.nim
View file

@ -14,7 +14,7 @@ proc agm(x,y: float): tuple[resA,resG: float] =
(a[23], g[23])
var t = agm(1, 1/sqrt(2))
var t = agm(1, 1/sqrt(2.0))
echo("Result A: " & formatFloat(t.resA, ffDecimal, 24))
echo("Result G: " & formatFloat(t.resG, ffDecimal, 24))