Posts by xrs‭

AWK, 28 26 21 bytes $0=$1~2&&$2~2?5:$1+$2 Try it online!

posted 6mo ago by xrs‭  ·  edited 20h ago by xrs‭

AWK, 80 bytes {split("I V X L C D M 1 5 10 50 100 500 1000",d);for(;d[++i]!=$1;);print d[i+7]} Try it online! A quick map function. 'split' breaks the string into array elements. Find the stri...

posted 6mo ago by xrs‭  ·  edited 6mo ago by xrs‭

AWK, 82 bytes {split($1,d,"");i=a=d[1];for(x in d){d[x]>a?a=d[x]:0;d[x]<i?i=d[x]:0}print a+i+$1} Try it online! Just pass your input, e.g.: echo "123" | awk '...'

posted 6mo ago by xrs‭  ·  edited 6mo ago by xrs‭

K (oK), 9 bytes {x#0}'!10 Try it online! !10 / pass range your arbitrary number .' / treat those as a list, and evaluate each separately { } / main function...

posted 6mo ago by xrs‭  ·  edited 3mo ago by xrs‭

AWK, 26 24 bytes END{for(;;)print x=x"*"} Try it online!

posted 6mo ago by xrs‭  ·  edited 6mo ago by trichoplax‭

AWK, 48 bytes ORS="";{l=split($0,d,"");for(;l>0;)print d[l--]} Try it online!

posted 6mo ago by xrs‭  ·  edited 6mo ago by xrs‭

AWK, 62 61 60 56 bytes {for(;i++<$1;)print i%3?i%5?i:y="Buzz":i%5?x="Fizz":x y} {for(;i++<$0;)print i%15?i%5?i%3?i:"Fizz":"Buzz":"FizzBuzz"} {for(;i++<$0;x=""){i%3||x="Fizz";i%5||x=...

posted 6mo ago by xrs‭  ·  edited 6mo ago by xrs‭

AWK, 2 bytes $0 Try it online! END{print "Hello, World!"}

posted 6mo ago by xrs‭

K (oK), 15 bytes "Hello, World!" Try it online! I'm terrible at K, but I've got that one down now.

posted 6mo ago by xrs‭