Averages/Arithmetic mean: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (Automated syntax highlighting fixup (second round - minor fixes)) |
|||
Line 2,677: | Line 2,677: | ||
len swap sum swap / print</syntaxhighlight> |
len swap sum swap / print</syntaxhighlight> |
||
=={{header| |
=={{header|Picat}}== |
||
<syntaxhighlight lang=" |
<syntaxhighlight lang="picat">mean([]) = false. |
||
mean(V) = sum(V) / len(V). |
|||
if ($nums) |
|||
echo array_sum($nums) / count($nums), "\n"; |
|||
else |
|||
echo "0\n";</syntaxhighlight> |
|||
=={{header|PicoLisp}}== |
=={{header|PicoLisp}}== |