RosettaCodeData/Task/Call-a-function/Lingo/call-a-function-5.lingo
2016-12-05 23:44:36 +01:00

7 lines
113 B
Text

on sum ()
res = 0
repeat with i = 1 to the paramCount
res = res + param(i)
end repeat
return res
end