RosettaCodeData/Task/Loops-Foreach/CLU/loops-foreach.clu
2023-07-01 13:44:08 -04:00

10 lines
269 B
Text

start_up = proc ()
po: stream := stream$primary_output()
words: array[string] := array[string]$
["enemy", "lasagna", "robust", "below", "wax"]
for word: string in array[string]$elements(words) do
stream$putl(po, word)
end
end start_up