Double ari = 1, geo = 0, har = 0
Short i, n = 10

for i = 1 to n
  ari += i
  geo *= i
  har += 1 \ i
next

print "ari:", ari \ n
print "geo:", geo^( 1 \ n )
print "har:", n \ har

handleevents