Task

Create a function that returns the maximum value in a provided set of values,

where the number of values may not be known until run-time.




list$= "1 12 -55 46 41 3.66 19"
while word$(list$,i+1," ") <> ""
  mx = max(mx,val(word$(list$,i+1," ")))
  i = i + 1
wend
print mx