RosettaCodeData/Task/Loops-Nested/Phix/loops-nested-2.phix
2016-12-05 23:44:36 +01:00

12 lines
261 B
Text

procedure till20()
for i=1 to 20 do
for j=1 to 20 do
printf(1,"%d",s[i][j])
if s[i][j]=20 then return end if
printf(1,", ")
end for
printf(1,"\n")
end for
end procedure
till20()
printf(1,"\n")