The program:
DATA 2,15,6,103,13,26,78,4,125
DO while more data
READ num
LET sum=sum+num
LET count = count+1
LOOP
LET ave=sum/count
PRINT "The average of ";count;" numbers is ";ave
END
Gives output:
The average of 9 numbers is 41.3333