「ユーザーが望むものまたは入力したもの」という文字列変数がパイムかどうかをチェックできる関数を定義するプログラムを作成します。（piem =語長がπの数字を表すストーリーまたは詩（Wikipediaから））

いくつかの例：

myfunction("I am clearly wrong") # False
myfunction("How I want a drink, alcoholic of course, after the heavy lectures involving quantum mechanics") #True (Taken from Wikipedia)
myfunction("Law ' s fine") # True

処理する前に、あらゆる種類の句読点または改行を削除する必要があります。純粋なコードゴルフ、最短の勝利

終了日：2014年1月10日の夕方

さまざまな答え

• 何桁処理する必要がありますか？10以上
• 関心事として、PIの0はどのように解釈されるべきですか？スキップまたは10文字の単語？10文字の言葉として
• 「piemと呼ばれる変数」–パラメータの名前はpiemでなければなりませんか？いいえ、質問テキストは修正されていません
• 楽しいボーナスはそれ自体が解決策である可能性がありますあなたの解決策が解決策である場合、* 0.5のボーナスが得られます
• 議論のために、_は常に句読点ですか？句読点かそうでないかを決めることができます
• 「あらゆる種類の句読点」が何を意味するのかは不明です、つまり、。 ''？！;;（）
• 数字を数える必要がありますか？そして、法律の罰金は虚偽でしょうか？数字は文字として扱う必要があります。Law's fine = False; Law 's fine = True

コメント

• APLソリューションはバイト単位でカウントする必要があります
• ソリューションがpiの100桁以上で機能する場合、* 0.8のボーナスが得られます
• 関心が高いため、終了日は1日先です。

APL（39）

{N≡(≢N←≢¨('\w+'⎕S'\0')⍵)↑⍎¨'_. '~⍨99⍕○1}

APLインタープリターのpi定数が提供するすべての数字を99の制限まで使用します。私の場合（Dyalog APL 14 32ビット）は16桁でした。64ビットバージョンには、おそらくより多くの桁があります。ただし、与えられた例が機能するには16桁で十分です。

確認できる数字がすべて真であっても、それ以上の単語を含む文字列は失敗します。（この記事の執筆時点では、他の投稿でも同じことが言えます。）たとえば、10桁しかなかった場合、「How I want to drink」は失敗します。これは修正できますが、14文字のコストがかかります：

{(≢¨('\w+'⎕S'\0')⍵){∧/(⌊/≢¨⍺⍵)↑∨⌿⍺∘.=⍵}⍎¨'_. '~⍨99⍕○1}

そのバージョンは、最初のN桁が正しい任意の文字列を受け入れます。

JavaScript （169）（140）（137）（135）（63）17桁のパイ

私のバージョンではLaw's fine、Law ' s fine両方ともtrue を返します。

IngoBürkとhslによる最新バージョン（63）

f=s=>!s.split(/\W+/).some((x,i)=>x.length-(Math.PI*1e16+'')[i])

piの17桁の新しいバージョン（135）（IngoBürkに感謝）：

f=(s)=>{
s=s.split(/[!"#$%&'()*+, \-.\/:;<=>?@[\\\]^_`{|}~]+/);
p=Math.PI*1e16+'';
    r=0;
    for(a=s.length;a--;)r+=s[a].length!=p[a];
    return !r
}

piの32桁の古いバージョン（169）：

f=(s)=>{
s=s.split(/[!"#$%&'()*+, \-.\/:;<=>?@[\\\]^_`{|}~]+/);
p="31415926535897932384626433832795".split('');
    r=1;
    for(a=s.length;a--;)if(s[a].length!=p[a]){r=0};
    return r;
}

ルビー、113 101 79（98 * 0.8）

require"bigdecimal/math"
x=->p{!(BigMath.PI(999).to_s[2..-1]!~/^#{p.scan(/\w+/).map(&:size)*''}/)}

説明

• 入力は、ラムダへの引数として取得されます。を期待していStringます。
• Piは999小数まで計算され、.削除された文字列に変換されます。
• 句読点は詩から削除され、個々の単語に分割されます。"Let's"は2つの単語としてカウントされます："Let"と"s"。
• を使用Array#mapして、各単語を単語のサイズに変換し、それらをに連結しますString。
• 正規表現を使用して、作成された2つStringのが同じ文字で始まるかどうかを確認します。

100桁以上の処理にボーナスを適用しました。_このソリューションでは、句読点として処理されません。

Mathematica、123バイト* 0.8 = 98.4

f=#&@@RealDigits[Pi,10,Length[d=StringLength/@StringSplit@StringReplace[#,RegularExpression@"[!-.:-?]
"->""]/. 10->0]]==d&;

これまでのほぼ最長の提出：

• Piの任意の桁数で機能します。
• これらの場所で単語を分割せずに、必要なASCII文字と改行をすべて削除します。
• Piの0桁を正しく処理します（10文字の単語として）

パイソン- 130 127 116 - PIの17桁

同様に@flawrの答え、Law ' s fineとLaw's fineの両方にtrueを返します。

プログラムから12文字を削除してくれた@Emilに感謝します。

import re
f=lambda x:all(j==int("31415926535897932"[i])for i,j in enumerate([len(s)for s in re.findall("[\w]+",x)]))

Java、185

boolean f(String...s){s=s[0].replaceAll("\\W","~").replaceAll("~+","~").split("~");for(int i=0;i<s.length;){if(s[i].length()!=(int)(Math.PI*Math.pow(10,i++)%10))return 0>1;}return 1>0;}

python 3、17桁のpi、104

import re;f=lambda s:all(map(int.__eq__, map(int, '31415926535897932'), map(len,re.findall('[\w]+',s))))

Python 3-129

句読点を考慮しない：

import math
f=lambda p:all(1if len(p.split(' ')[i])!=int(str(math.pi).replace('.','')[i])else 1for i in range(len(p.split(' '))))

T-SQL 488 383

そして今、大規模なT-SQLソリューションの場合:)

CREATE FUNCTION F(@s VARCHAR(MAX))RETURNS CHAR(6) AS BEGIN DECLARE @ CHAR='T',@p VARCHAR(50)='31415926535897932384626433832795028841971693993751',@i INT=0WHILE @='T'AND @s<>''BEGIN SET @i=PATINDEX('%[^a-z0-9]%',@s)IF @i=0RETURN'#True'IF @i-1<>LEFT(@p,1)RETURN'#False'SET @p=STUFF(@p,1,1,'')SET @s=STUFF(@s,1,@i,'')SET @s=STUFF(@s,1,PATINDEX('%[a-z0-9]%',@s)-1,'')END RETURN'#True'END

これにより、再帰CTEを使用して単語の境界を検出するインラインテーブル値関数が作成されます。

単語とPIを小数点以下31桁（最初の0）までかみ砕くスカラー関数を作成します。次のように呼び出されます

SELECT dbo.f('SQL I golf, a large procedure is normal. Hefty not terse') --#True

CJam、40

"
,.'\"?!;:"{-}/S%{,PAV#*iA%=V):V}/]0#)!

「あらゆる種類の句読点」が何を意味するのかは不明です。このソリューションは、,.'"?!;;文字を削除します。

BashおよびUNIXツール、111

f() { grep ^"$(echo "$@"|grep -Po '[\w]+'|xargs -n1 sh -c 'echo ${#0}'|xargs|tr -d ' ')"<<<31415926535897932; 

NodeJS 32桁230バイト

私はJSでそれを短くすることはできません：D

var p = "31415926535897932384626433832795", i = 0;
console.log(process.argv[2].split(/[\s,.]+/).every(function(w) {
    if (parseInt(p.charAt(i)) !== w.length) {
        return false;
    }
    i++;
    return true;
}) ? 'True' : 'False');