RosettaCodeData/Task/Call-a-function/Lingo/call-a-function-5.lingo

8 lines
113 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
on sum ()
res = 0
repeat with i = 1 to the paramCount
res = res + param(i)
end repeat
return res
end