RosettaCodeData/Task/Loops-Nested/Icon/loops-nested-1.icon

11 lines
291 B
Plaintext

procedure main()
every !(!(L := list(10)) := list(10)) := ?20 # setup a 2d array of random numbers up to 20
every i := 1 to *L do # using nested loops
every j := 1 to *L[i] do
if L[i,j] = 20 then
break break write("L[",i,",",j,"]=20")
end