Anonymous user
Averages/Arithmetic mean: Difference between revisions
→{{header|MAXScript}}
({{header|Liberty BASIC}}) |
|||
Line 899:
print (mean #(3, 1, 4, 1, 5, 9))</lang>
=={{header|Modula-2}}==
<lang modula2>PROCEDURE Avg;
VAR avg : REAL;
BEGIN
avg := sx / n;
InOut.WriteString ("Average = ");
InOut.WriteReal (avg, 8, 2);
InOut.WriteLn
END Avg;</lang>
=={{header|Nial}}==
| |||