Just because Exercism doesn’t offer your favorite language as an official track, it doesn’t mean we can’t play at all. Post some solutions to the weekly challenges in the language of your choice!

  • AndyOPM
    link
    fedilink
    arrow-up
    1
    ·
    8 months ago
    Raindrops, again
    USING: assocs kernel math.functions math.parser sequences sequences.extras ;
    
    : raindrops ( n -- sound )
      { 3 5 7 } [ dupd divisor? ] find-all keys
      { "Pling" "Plang" "Plong" } nths concat
      [ number>string ] [ nip ] if-empty ;