14 lines
574 B
Plaintext
14 lines
574 B
Plaintext
local fn MeanAverageOfNumberArray( numberArr as CFArrayRef ) as CFStringRef
|
|
CFStringRef result = NULL
|
|
if len(numberArr) == 0 then result = @"Mean undefined for empty array." : exit fn
|
|
result = fn StringWithFormat( @"Mean average of %d numbers: %@", len(numberArr), fn ObjectValueForKeyPath( numberArr, @"@avg.self" ) )
|
|
end fn = result
|
|
|
|
CFArrayRef numberArray
|
|
numberArray = @[@1, @2, @3, @4, @5, @6, @7, @8, @9, @10]
|
|
print fn MeanAverageOfNumberArray( numberArray )
|
|
numberArray = @[@3, @1, @4, @1, @5, @9]
|
|
print fn MeanAverageOfNumberArray( numberArray )
|
|
|
|
HandleEvents
|