7 lines
197 B
Text
7 lines
197 B
Text
procedure print3(sequence a, b, c)
|
|
for i=1 to min({length(a),length(b),length(c)}) do
|
|
printf(1, "%s%s%g\n", {a[i], b[i], c[i]})
|
|
end for
|
|
end procedure
|
|
|
|
print3("abc","ABC",{1, 2, 3})
|