Rosetta Code

First-class functions/Use numbers analogously: Difference between revisions

Page Discussion

First-class functions/Use numbers analogously (view source)

Revision as of 10:49, 15 March 2019

32 bytes added ,  5 years ago
m
→‎{{header|Elena}}
No edit summary
Line 359:
=={{header|Elena}}==
{{trans|C#}}
ELENA 3.4.x :
<lang elena>import system'routines.;
import extensions.;
public program()
{
[
varreal x := 2.0r.;
varreal xi := 0.5r.;
varreal y := 4.0r.;
varreal yi := 0.25r.;
varreal z := x + y.;
varreal zi := 1.0r / (x + y).;
var numlist := (new real[]{ x, y, z ).};
var numlisti := (new real[]{ xi, yi, zi ).};
var multiplied := numlist zip:.zipBy(numlisti, by(:n1:,n2)( => (:m)( => n1 * n2 * m) ); toArray).toArray();
multiplied .forEach:(:multiplier)[{ console .printLine(multiplier(0.5r)) ].}
]}</lang>
{{out}}
<pre>
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/124014"