4 lines
103 B
Factor
4 lines
103 B
Factor
|
USING: io kernel sequences ;
|
||
|
|
"Rosetta code" [ rest ] [ but-last ] [ rest but-last ] tri
|
||
|
|
[ print ] tri@
|