11 lines
180 B
Text
11 lines
180 B
Text
link numbers # for max
|
|
|
|
procedure main()
|
|
|
|
a := ["a","b","c"]
|
|
b := ["A","B","C","D"]
|
|
c := [1,2,3]
|
|
|
|
every i := 1 to max(*a,*b,*c) do
|
|
write(a[i]|"","\t",b[i]|"","\t",c[i]|"")
|
|
end
|