RosettaCodeData/Task/Identity-matrix/11l/identity-matrix.11l
2023-07-01 13:44:08 -04:00

8 lines
152 B
Text

F identity_matrix(size)
V matrix = [[0] * size] * size
L(i) 0 .< size
matrix[i][i] = 1
R matrix
L(row) identity_matrix(3)
print(row)