diff options
| author | HVukman <peterslopp@googlemail.com> | 2025-07-28 16:16:15 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-07-28 16:16:15 +0200 |
| commit | 058ee3085e2de9027246ec49fc8a2056a3f4500a (patch) | |
| tree | b02298f44a5df4fe478586a8b2a8e033a89012b5 | |
| parent | 596c679809c2a2172c8e42b99b25ae9247d11179 (diff) | |
| download | perlweeklychallenge-club-058ee3085e2de9027246ec49fc8a2056a3f4500a.tar.gz perlweeklychallenge-club-058ee3085e2de9027246ec49fc8a2056a3f4500a.tar.bz2 perlweeklychallenge-club-058ee3085e2de9027246ec49fc8a2056a3f4500a.zip | |
Create 332_p1.fs
| -rw-r--r-- | challenge-332/hvukman/f#/332_p1.fs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/challenge-332/hvukman/f#/332_p1.fs b/challenge-332/hvukman/f#/332_p1.fs new file mode 100644 index 0000000000..cc86707cf8 --- /dev/null +++ b/challenge-332/hvukman/f#/332_p1.fs @@ -0,0 +1,11 @@ +// 332 part 1 + +let inp_list1 = [| "2025-07-26";"2000-02-02"; "2024-12-31"|]; + +for i in inp_list1 do + let split = i.Split '-' + for j in 0 .. (Seq.length(split))-1 do + // conversion of int to Binary with "%B" + printf "%B" (System.Int32.Parse(split[j])) + if j <> (Seq.length(split))-1 then printf "%s" "-" + printf "\n" |