Sum multiples of 3 and 5: Difference between revisions

=={{header|PascalABC.NET}}==

<syntaxhighlight lang="delphi">

##

var n := 1000;

(3..n-1).Where(i -> i.Divs(3) or i.Divs(5)).Sum.Println

</syntaxhighlight>

{{out}}

<pre>

233168

</pre>