diff options
| author | Mohammad Sajid Anwar <Mohammad.Anwar@yahoo.com> | 2025-05-25 10:03:38 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-05-25 10:03:38 +0100 |
| commit | 143083cf25767ba28aef8cedb510cbb51a396bf2 (patch) | |
| tree | ca978c719d81b1967fbc7bc41e281a21d85e5300 | |
| parent | 995e185aa455248b2852b63cd36c15e815de8fb5 (diff) | |
| parent | 6911a1f9bfd77b09eb73465f954f59481c82cc8d (diff) | |
| download | perlweeklychallenge-club-143083cf25767ba28aef8cedb510cbb51a396bf2.tar.gz perlweeklychallenge-club-143083cf25767ba28aef8cedb510cbb51a396bf2.tar.bz2 perlweeklychallenge-club-143083cf25767ba28aef8cedb510cbb51a396bf2.zip | |
Merge pull request #12073 from HVukman/branch-for-challenge-322
Added K
| -rw-r--r-- | challenge-322/hvukman/k/322_p1.k | 27 | ||||
| -rw-r--r-- | challenge-322/hvukman/k/322_p2.k | 11 |
2 files changed, 38 insertions, 0 deletions
diff --git a/challenge-322/hvukman/k/322_p1.k b/challenge-322/hvukman/k/322_p1.k new file mode 100644 index 0000000000..21d7c63904 --- /dev/null +++ b/challenge-322/hvukman/k/322_p1.k @@ -0,0 +1,27 @@ +sol::"" +dummy::"" +inp:"ABC-D-E-F" +i:3 +cool:(|"-"\inp)[&0<#'|"-"\inp] +first:(|cool)[0] +cool:1_|cool +nooutput: {dummy::dummy,x;$[(#dummy)<i;;[sol::sol,"-",dummy;dummy::""]]}'cool +first,sol + + +sol::"" +dummy::"" +inp:"A-BC-D-E" +i:2 +cool:(|"-"\inp)[&0<#'|"-"\inp] +first:(|cool)[0] +cool:1_|cool +nooutput: {dummy::dummy,x;$[(#dummy)<i;;[sol::sol,"-",dummy;dummy::""]]}'cool +first,sol + +sol::"" +dummy::"" +i:4 +cool:(|"-"\"-A-B-CD-E")[&0<#'|"-"\"-A-B-CD-E"] +nooutput: {dummy::dummy,x;$[(#dummy)<i;;[sol::sol,|dummy;dummy::""]]}'cool +dummy,"-",sol diff --git a/challenge-322/hvukman/k/322_p2.k b/challenge-322/hvukman/k/322_p2.k new file mode 100644 index 0000000000..0c73e25e7f --- /dev/null +++ b/challenge-322/hvukman/k/322_p2.k @@ -0,0 +1,11 @@ +inp: 55 22 44 33 +sorted:inp[<inp] +1+{(|x)[0]}'{&x=1}'{x=sorted}'inp + +inp: 10 10 10 +sorted:inp[<inp] +1+{(x)[0]}'{&x=1}'{x=sorted}'inp + +inp:5 1 1 4 3 +sorted:inp[<inp] +{(|x)[0]}'{&x=1}'{x=sorted}'inp |