Averages/Arithmetic mean: Difference between revisions

Undo revision 330156 by Willi64 (talk)
(Undo revision 330157 by Willi64 (talk))
Tag: Undo
(Undo revision 330156 by Willi64 (talk))
Tag: Undo
Line 2,677:
len swap sum swap / print</syntaxhighlight>
 
=={{header|PicatPHP}}==
<syntaxhighlight lang="picatphp">mean([])$nums = false.array(3, 1, 4, 1, 5, 9);
if ($nums)
mean(V) = sum(V) / len(V).
echo array_sum($nums) / count($nums), "\n";
else
echo "0\n";</syntaxhighlight>
 
=={{header|PicoLisp}}==
11

edits