6 lines
123 B
APL
6 lines
123 B
APL
|
nth←{
|
|||
|
|
sfx←4 2⍴'stndrdth'
|
|||
|
|
tens←(10<100|⍵)∧20>100|⍵
|
|||
|
|
(⍕⍵),sfx[(4×tens)⌈(⍳3)⍳10|⍵;]
|
|||
|
|
}
|