Print coordinates of an NxN grid

Question

Question: Print out all the coordinates of a NxN grid. Preferably in C, however other languages also accepted

Input: N (integer)

Output: for N=3, a 3x3 grid:

0,0
1,0
2,0
0,1
1,1
2,1
0,2
1,2
2,2

Answer 1

C (gcc), 83 51 bytes

Saved 32 bytes and fixed output order thanks to Kevin Cruijssen.

i;f(n){for(i=0;i<n*n;)printf("%d,%d\n",i++%n,i/n);}

Try it online!

I'm by no means a C programmer (or C golfer), but I thought I'd give it a try. Should the main be included in the byte count?

Answer 2

Japt, 3 bytes

o ï

Try it

o       :Range [0,input)
  ï     :Cartesian product with itself

Answer 3

R, 33 25 bytes

which(diag(scan())|1,T)-1

Try it online!

Thanks to Kirill L. for suggesting a 2-byte golf, which inspired me to look further :-)

Answer 4

05AB1E, 8 bytes

L<ãí',ý»

Exactly as the challenge description: prints the 0-indexed coordinates ordered by y-then-x comma- and newline-delimited to STDOUT.

Try it online.

Explanation:

L          # Create a list in the range [1, (implicit) input]
           #  i.e. 3 → [1,2,3]
 <         # Decrease each by 1 to make the range [0, input)
           #  i.e. [1,2,3] → [0,1,2]
  ã        # Create each possible pair with itself
           #  i.e. [0,1,2] → [[0,0],[0,1],[0,2],[1,0],[1,1],[1,2],[2,0],[2,1],[2,2]]
   í       # Reverse each pair so they're sorted by y-then-x instead of x-then-y
           #  i.e. [[0,0],[0,1],[0,2],[1,0],[1,1],[1,2],[2,0],[2,1],[2,2]]
           #   → [[0,0],[1,0],[2,0],[0,1],[1,1],[2,1],[0,2],[1,2],[2,2]]
    ',ý   '# Join each pair with a space delimiter
           #  i.e. [[0,0],[1,0],[2,0],[0,1],[1,1],[2,1],[0,2],[1,2],[2,2]]
           #   → ["0,0","1,0","2,0","0,1","1,1","2,1","0,2","1,2","2,2"]
       »   # And then join everything with a newline delimiter (and output implicitly)
           #  i.e. ["0,0","1,0","2,0","0,1","1,1","2,1","0,2","1,2","2,2"]
           #   → "0,0\n1,0\n2,0\n0,1\n1,1\n2,1\n0,2\n1,2\n2,2"

---

05AB1E, 2 bytes

Lã

Returns a list of 1-indexed coordinates ordered by x-then-y.

Try it online.

Explanation:

L     # Create a list in the range [1, (implicit) input]
      #  i.e. 3 → [1,2,3]
 ã    # Create each possible pair with itself (and output implicitly)
      #  i.e. [1,2,3] → [[1,1],[1,2],[1,3],[2,1],[2,2],[2,3],[3,1],[3,2],[3,3]]

Answer 5

PowerShell, 48 42 bytes

param($n)0..--$n|%{$i=$_;0..$n|%{"$i,$_"}}

Try it online!

Boring double-for loop.

Saved 6 bytes thanks to mazzy.

Answer 6

C#, 59, 65

First time posting. Apologies if I do something wrong!

l=>{for(int j=0;j<l*l;)System.Console.Write($"{j%l},{j++/l}\n");}

Try it online! -per Kevin Crujissen's TIO Link.

Answer 7

Tcl, 70 bytes

proc C {n i\ 0} {time {set j 0
time {puts $i,$j
incr j} $n
incr i} $n}

Try it online!

Answer 8

Python 2, 39 bytes

lambda n:[(i%n,i/n)for i in range(n*n)]

Try it online!

Answer 9

Pyth, 4 bytes

^UQ2

Full program. Outputs list of coordinate pairs.

^UQ2   Implicit: Q=eval(input())
 UQ    [0-Q)
^  2   Take the cartesian product of the previous result with itself

Answer 10

MathGolf, 2 bytes

r■

Try it online!

Explanation

r    Range(0, n)
 ■   Cartesian product with self for lists

For pretty-printing, you could add n to have it print one list item per line.

Answer 11

APL+WIN, 11 bytes

(⍳n)∘.,⍳n←⎕

Index origin = 0. Prompts for input for n and outputs the following for n=4:

0 0  0 1  0 2  0 3
1 0  1 1  1 2  1 3
2 0  2 1  2 2  2 3
3 0  3 1  3 2  3 3

Answer 12

Pepe, 88 bytes

I've never done 2D iterating in Pepe before and it doesn't seem to work pretty well due to labels being dynamic. There's quite a lot of two byte commands to avoid moving the pointer.

REREeErEErerErEReREErEEEErreEEreeeEeEEeerEEeerreEErEEEEEreeEReererEEEEErERRREEEEEeRrEree

Try it online!

Warning: Do not run it with input below 1 - it will kill your browser.

Answer 13

Perl 5 -na, 35 bytes

map{//;say"$',$_"for 0..$F[0]}0..$_

Try it online!

Answer 14

Powershell, 43 bytes

param($n)$i--..--$n*++$n|%{$i+=!$_;"$i,$_"}

Explanation:

One row 0..$n-1 repeated $n times.

Answer 15

Pure Bash (no external utilities), 35

eval echo {0..$[$1-1]},{0..$[$1-1]}

Try it online!

Answer 16

Lua, 63 bytes

s=io.read()-1 for i=0,s do for j=0,s do print(i..','..j)end end

Try it online!

Answer 17

Perl5, 42 38 bytes

for$i(0..--$n){for(0..$n){say"$i,$_"}}

(The inner loop saves a few bytes by using the implicit variable "$_" as an index.)