12 lines
271 B
Text
12 lines
271 B
Text
floyd2(N) = S =>
|
|
S = [],
|
|
foreach(I in 1..N)
|
|
SS = "",
|
|
foreach(J in 1..I)
|
|
Last = N * (N-1)/2+J,
|
|
V = I * (I-1) // 2 + J,
|
|
C = Last.to_string().length-1,
|
|
SS := SS ++ to_fstring(to_fstring("%%%dd",C), V)
|
|
end,
|
|
S := S ++ slice(SS,2) ++ "\n"
|
|
end.
|