Code Golf - The Reboot #5 - Winners

JWinslow23 40 Golfscript HowshouldIknowthetimethisisn'tanentry

.~:N;{48-}/]{.{+}*\(;\[]++.)\;N<}do)\;N=

lirtosiast 43 TI-BASIC Jul 01 2015 02:25:25 pm

Input N
int(10fPart(N10^(seq(A,A,~14,~1
While N≠max(Ans
augment(Ans,{sum(Ans,dim(Ans)-int(log(N
End

PT_ 43 TI-BASIC Jul 02 2015 01:24:20 pm

Input N
int(10fPart(N10^(seq(A-1,A,~int(log(N)),0
While N!=sum(Ans
DeltaList(cumSum(augment(Ans,{sum(Ans
End

Cumred_Snektron 83 Python Jul 01 2015 10:37:07 am

n=input();l=map(int,str(n))
while l[-1]<n:l=l[1:]+l[:1];l[-1]=sum(l)
print l[-1]==n

mr womp womp 97 TI-BASIC Jun 30 2015 09:13:00 pm

Input Str1
expr(Str1->B
{expr(sub(Str1,1,1->L2
For(A,2,length(Str1
augment(L2,{expr(sub(Str1,A,1->L2
End
Repeat E>B
sum(L2->E
If E=B:Disp 1
DeltaList(cumSum(L2->L2
augment(L2,{E->L2
End

Adriweb 112 Javascript Jun 30 2015 02:06:20 am

function K(a){t=(""+a).split("");l=t.length;for(s=o=0;a>s;t.push(s),o++)for(i=s=0;l>i;)s+=+t[i+++o];return s==a}

Juju 150 Ruby Jun 30 2015 04:57:53 pm

n=ARGV[0]
d=n.split("")
n=n.to_i
l=d.count
(0...l).each{|a|d[a]=d[a].to_i}
i=l-1
while d[i]<n do
i+=1
d[i]=0
(1..l).each{|j|d[i]+=d[i-j]}end
p d[i]==n

Adriweb 152 Lua Jun 30 2015 02:06:20 am

function K(c)s=""..c;l=#s;t={}for d=1,l do t[#t+1]=s:sub(d,d)end;a=0;b=0;while a<c do a=0;for d=1,l do a=a+t[d+b]end;t[#t+1]=a;b=b+1 end;return a==c end

c4ooo 190 Java Jul 01 2015 12:32:49 pm

void k(int a){int l=(a+"").length(),q=0,e=10;int[]i=new int[l];for(;q<l;q++)i[q]=(int)(a/Math.pow(e,l-q-1)%e);while(e<a){e=0;for(int w:i)e+=w;System.arraycopy(i,1,i,0,l-1);i[l-1]=e;q/=e-a;}}