Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Averages-Arithmetic-mean/IS-BASIC/averages-arithmetic-mean.basic
+++ b/Task/Averages-Arithmetic-mean/IS-BASIC/averages-arithmetic-mean.basic
@ -0,0 +1,10 @@
+100 NUMERIC ARR(3 TO 8)
+110 LET ARR(3)=3:LET ARR(4)=1:LET ARR(5)=4:LET ARR(6)=1:LET ARR(7)=5:LET ARR(8)=9
+120 PRINT AM(ARR)
+130 DEF AM(REF A)
+140   LET T=0
+150   FOR I=LBOUND(A) TO UBOUND(A)
+160     LET T=T+A(I)
+170   NEXT
+180   LET AM=T/SIZE(A)
+190 END DEF