Data update

Task/Statistics-Basic/EasyLang/statistics-basic.easy

@@ -1,24 +1,18 @@
 global list[] .
-proc mklist n . .
+proc mklist n .
    list[] = [ ]
-   for i = 1 to n
-      list[] &= randomf
-   .
+   for i = 1 to n : list[] &= randomf
 .
 func mean .
-   for v in list[]
-      sum += v
-   .
+   for v in list[] : sum += v
    return sum / len list[]
 .
 func stddev .
    avg = mean
-   for v in list[]
-      squares += (avg - v) * (avg - v)
-   .
+   for v in list[] : squares += (avg - v) * (avg - v)
    return sqrt (squares / len list[])
 .
-proc histo . .
+proc histo .
    len hist[] 10
    for v in list[]
       ind = floor (v * 10) + 1
@@ -30,8 +24,8 @@ proc histo . .
       print v & " " & s$
    .
 .
-numfmt 4 5
-proc stats size . .
+numfmt 5 4
+proc stats size .
    mklist size
    print "Size:   " & size
    print "Mean:   " & mean