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.




functioni FindMax(...) as double
    dim x as integer
 
    for x = 1 to ParamValCount
        IF ParamVal(x) > Result THEN Result = ParamVal(x)
    next
End functioni
 
Print FindMax(50, 20, 65, 20, 105)
 