New answers tagged

1

APL (Dyalog Unicode), 19 12 bytes SBCS ⎕UCS ⍝ Convert the argument (string) into an array of codepoints. 4+ ⍝ and add 4 to each of those codepoints. ¨ ⍝ Now, for each of those numbers ⍕ ⍝ turn it into a string ∘ ⍝ and 1↓ ⍝ drop its first character. ∊ ⍝ Finally enlist the strings ...


0

PowerShell, 99 bytes ([char[]]"$args"|%{"0$((@(65..90|%{[char]$_})-join'').indexof($_.tostring().toupper())+1)"})-join'' Try it online!


0

K (oK), 13 bytes Solution: ,//$3 10\'96! Try it online! Explanation: ,//$3 10\'96! / the solution 96! / input modulo 96 3 10\' / convert to base 30ish $ / convert to string ,// / flatten (,/) over (/)


0

Erlang (escript), 39 bytes The usual +4 approach. f(X)->[tl(integer_to_list(I+4))||I<-X]. Try it online!


0

Whitespace, 84 bytes [N S S N _Create_Label_LOOP][S S S N _Push_0][S N S _Dupe_0][T N T S _Read_STDIN_as_char][T T T _Retrieve_input][S S S T T S S S S S N _Push_96][T S S T _Subtract][S N S _Dupe][S S S T S T S N _Push_10][T S S T _Subtract][N T T S N _If_neg_jump_to_Label_PRINT_0][N S S T N _Create_Label_DONE_WITH_PRINT_0][T ...


Top 50 recent answers are included