Comment detail

LL Golf Hole 5 - 最上位の桁を数え上げる (Nested Flatten)
スクリプト内のリテラルとして、300という整数を与えています。

escript スクリプトのファイル名

として実行します。
この場合、最初のコメント行は必須です。
1
2
3
4
5
%
s(X,Y)when X < 10->erlang:display(Y);
s(X,Y)when X rem 10=:=0->s(X div 10,Y);
s(_,_)->0.
main(_)->[s(X,X)||X<-lists:seq(0,300)].

Index

Feed

Other

Link

Pathtraq

loading...