小学校では、子どもたちは分子が分母より小さく、したがって分数の値が1より小さい適切な分数について学びます。後で、分数の値が1より大きい分数と、これらの分数を表す2つの異なる方法：混合分数と不適切な分数について教えます。

混合分数が与えられた場合、整数値と分子が連結された不適切な分数に等しいかどうかを判断します。たとえば、入力の1 3/4場合、不適切な分数は13/4です。

テストケース

1 3/4        -> falsey
1 3/10       -> truthy
6 6/7        -> falsey
55 55/100    -> truthy
4 9/100      -> falsey
40 9/100     -> falsey
7 49/1000    -> falsey
9 1/2        -> falsey
999 999/1000 -> truthy
1 21/200     -> falsey
1 21/101     -> falsey

入力については、整数部分と小数部分を別々の入力として使用できますが、小数を2つの部分として入力として使用することはできず、小数として使用することもできません。使用する必要がない場合は、整数部分を削除することができます（入力として使用しないでください）。

MATL、7バイト

UsGXzU=

入力は文字列です。出力は1真実、0偽りです。

オンラインでお試しください！または、すべてのテストケースを確認します。

説明

U     % Implicit input. Convert to number(s): gives a vector of two numbers
s     % Sum of that vector
G     % Push input again
Xz    % Remove spaces
U     % Convert to number
=     % Equal? Implicit display

Perl 6の、16の 12バイト

{1+$_==1~$_}

オンラインでお試しください！

分数を表す文字列として入力を受け取ります。Perl 6の動的型付けが合理的な分数の文字列を処理できることが判明しました。そのため、文字列"1/10"は数値に強制されたときに戻ります0.1

匿名コードブロックは、分数と1が分数に連結されたものに等しいかどうかを単純にチェックします。整数部分が重要でないことを示してくれたxnorのPythonの回答に感謝します。

古いソリューション、27 26バイト

{.nude[0]==.Int~[%] .nude}

オンラインでお試しください！

入力を合理的な混合分数として受け取り、trueまたはfalseを返します。4番目のテストケースは単純化できるため、falseを返します。

説明：

.nudeのリストを返します[numerator, denominator]。

{                        } # Anonymous code block
 .nude[0]    # Check if the numerator of the mixed fraction
         ==  # Is equal to
           .Int  # The integer part of the fraction
               ~ # Concatenated to
                [%] .nude  # The numerator modulo the denominator
                           # And return implicitly

網膜0.8.2、17の、16バイト

(.)+/1(?<-1>0)*$

オンラインでお試しください！分数部分のみが必要なため、リンクされたテストスイートはテストケースから整数を削除します。説明：分母が10の累乗で、分子が分母のゼロごとに1桁の場合にのみ、不適切な連結は混合数と等しくなります。.NETのバランスグループは、十分な桁数があることを確認するために使用されます。編集：@sundarのおかげで1バイト保存されました。

殻、8バイト

§·=r¤+r+

オンラインでお試しください！

説明

§(·=r)(¤+r)(+)  -- example arguments: "1" "3/10"
§               -- fork both arguments
      (¤ r)     -- | read both: 1 3/10
      ( + )     -- | and add them: 13/10
           (+)  -- | concatenate: "13/10"
                -- and do
 (· r)          -- | read the second argument: 13/10
 ( = )          -- | and compare: 13/10 == 13/10
                -- : 1

Python 2、43バイト

lambda k:k.split('/')[1]==`10**k.find('/')`

オンラインでお試しください！

R、78 65バイト

function(n,e=function(a)eval(parse(t=sub(" ",a,n))))e("")==e("+")

オンラインでお試しください！

ジュゼッペとJayCeの両方のおかげで-13バイト！

スタックス、5 バイト

╡ÄLσ`

実行してデバッグする

説明：

+yj$e= Full program, implicit input
+      Add integer and fraction part
 y     Push unparsed input
  j$   Split on spaces and flatten, i.e. Remove spaces
    e  Evaluate
     = Check for equality

Python 3、26バイト

lambda k:eval(k+'+1==1'+k)

オンラインでお試しください！

たとえば、入力3/4はを与え3/4+1==13/4ます。分数の全体を取得する代わりに1、混合分数の等価性をテストするように設定します。Chas Brownのテストケース。

Brachylog、15バイト

ḍ{lᵛ&ht¬ị&t↔ị1}

オンラインでお試しください！

小数部分のみを文字列入力として受け取ります。

ジュリアの答えと同じ考え方を間接的に使用します-「分母は10 ^ {分子の長さ}」は「分母は10の累乗であり、分母の長さは分子の長さ+ 「/」の長さ（つまり1）。

ḍ                   % split the input in half
 {            }     % and verify that
  lᵛ                % each half has the same length (i.e. the string had even length)
    &ht¬ị           % and the last character of the first half is 
                    %  not a number (it should be "/")
         &t↔ị1      % and the second half when reversed is the number 1
                    %  i.e. the denominator should be a power of 10

古い回答：

15 20バイト

a₀ᶠịˢtl;10↺^.&a₁ᶠịˢh

オンラインでお試しください！

（@Fatalizeのおかげで1バイトですが、古いメソッドのバグを発見してから残念ながら+6バイトです。）

私のジュリアの答えと同じ考え。

ジュリア0.6、29バイト

r->10^ndigits(num(r))==den(r)

オンラインでお試しください！

分母が分子の桁数と同じ数のゼロを持つ10の累乗である場合にのみ、出力がtrueであるという考えに基づいています。入力をRationalタイプとして受け取り、分母が分子の桁数に10を乗じたものに等しいことを確認します。

クリーン、57バイト

import StdEnv,Text
$b#[u,v:_]=split"/"b
=v==""<+10^size u

オンラインでお試しください！

これは少し短くなりますが、大きな分子/分母では壊れます。

クリーン、77 61 60 58バイト

-1 私の他の答えに関するOMᗺのヒントのおかげ

import StdEnv,Text
$b#[u,v:_]=split"/"b
=1<+[48\\_<-:u]==v

オンラインでお試しください！

これはNeilの方法を使用しており、直接行うよりも少し短くなっています。
変換のオーバーロード、といくつかの策略あります1<+[48\\_<-:u]変換[Int]する[Char]と、その後には、{#Char} (:== String)しかし、Int直接的にString。

クリーン、91 89バイト

import StdEnv,Text
t=toInt
$a b#[b,c:_]=map t(split"/"b)
#d=t(a<+b)
=d/c==t a&&d-d/c*c==b

オンラインでお試しください！

$ :: String String -> Bool分子と分母を抽出し、整数部と分子を文字列連結し、等価性をチェックする関数を定義します。

05AB1E、7 バイト

'/¡ćg°Q

入力として分数のみを受け取ります。

オンラインそれを試してみたり、すべてのテストケースを検証します。

説明：

'/¡        # Split the input by '/'
           #  i.e. '3/10' → ['3', '10']
   ć       # Head extracted:
           #  i.e. ['3', '10'] → 10 and 3
    g      # Take the length of the numerator
           #  i.e. '3' → 1
     °     # Take 10 to the power of this length
           #  1 → 10**1 → 10
      Q    # Check if that value equals the denominator
           #  10 and 10 → 1 (truthy)

またはより一般的な説明：

次の2つのことを検証する必要があります。

• 分母は係数10（1, 10, 100, 1000など）ですか？
• 分子の長さ+ 1は分母の長さと同じですか？
  • この2番目の部分は、分母がそのまま分子の長さの10乗に等しいかどうかをチェックすることで行われ、2バイトを節約します。

PS：分子と分母を別々の入力としてとることができれば、たった3バイトで十分でしょうg°Q。

JavaScript、26バイト

カリー化構文（f(x)(y)）で入力を受け取ります。ここxで、は整数でありy、文字列としての分数です。

x=>y=>x==eval(x+y)-eval(y)

オンラインで試す

Java 10、107 70 67 57バイト

f->new Long(f.split("/")[1])==Math.pow(10,f.indexOf("/"))

のない世界へようこそeval。..

@ChasBrownのPython 2回答のポートを作成して-40バイト。@Shaggyの
おかげで-10バイト（@ChasBrownの答えを読み、（）..を使用する必要がありました。）findindexOf

オンラインでお試しください。

説明：

f->                         // Method with String parameter and boolean return-type
  new Long(f.split("/")[1]) //  Take the denominator as integer
  ==Math.pow(10,            //  And check whether it is equal to 10 to the power of:
                f.indexOf("/"))
                            //   the length of the numerator-String

Haskell、47 40バイト

-7OMᗺに感謝

f b|(u,v)<-span('/'<)b="/1"++('0'<$u)==v

オンラインでお試しください！

Neilの方法を使用したClean回答の移植版。

Perl 5 -p、23バイト

$_=eval=~s/..//r eq$_+0

オンラインでお試しください！

（OPで許可されているように）入力として小数部分のみを取り、trueの場合は1を出力し、falseの場合は何も出力しません。

$_=       # assign to be printed by -p
eval      # evaluate fraction to get 0.something, for eg. 0.54
=~s/..//r # remove the 0. part, giving 54
 eq       # string equality check
$_+0      # after first coercing input to number to remove / and denominator

分母が分子のすぐ次の10のべき乗である場合にのみ、それ自体がとる小数部分は分子と正確に等しくなります。これは確認する必要がある条件です。

ネーター、17バイト

I#I"/"^WL1-%WL_=P

オンラインでお試しください！

説明

では、これはどのように機能しますか？テストケースを見ると、真のケースは分母が10の累乗である場合のみです。$10^a$、 どこ $a$ 分子の長さに1を足したもの（$a = \lfloor \log_{10} n \rfloor + 1$、 どこ $n$ 分子であり、 $\lfloor x \rfloor$ フローリング機能を表します）。

I#                - Push the first input then pop it off the stack
  I"/"^           - Push the second input and split the string at "/"
       W          - Convert the top (the denominator) of the stack from a string to a number
        L1-       - Take the log 10 of the top of the stack and subtract 1 (a)
           %      - Rotate the stack
            WL_   - Convert the top of the stack (the numerator) to a number, take the log10 and floor the result (b)
               =  - Check if a and b are equal
                P - Print the top of the stack

TeaScript、25バイト

最初の入力は小数、2番目は整数です。

私はTeaScriptで始めたばかりなので、多くのゴルフがダウンするかもしれません

s"/")▒⌐ep(xs"/")░.n

オンラインでお試しください！

R、53バ​​イト

function(n,x=el(strsplit(n,"/")))x[2]==10^nchar(x[1])

オンラインでお試しください！

入力として小数部分のみを取ります。xnorがコメントで述べたように：

これは、「重要ではない入力と、スラッシュで区切られた文字列としての2つの数字を与え、2番目の数字が10の最初の数字の長さの累乗に等しいかどうかを判断する」と同等のようです。

ロバートS.の答えはゴルフっぽさは少ないが、私のものよりもはるかに興味深い。

C（gcc）、67 56 55バイト

• OOBalanceのおかげで11バイト節約されました。
• ceilingcatのおかげで1バイト節約できました。

m;x(char*_){for(m=1;*_++;m*=10)*_*=*_^47;m=m==atoi(_);}

オンラインでお試しください！

Excel、52バイト

=10^FIND("/",B1)/10-MID(B1,FIND("/",B1)+1,LEN(B1))=0

整数入力を無視します。基本的に：IS Denominator = 10^LEN(Numerator)

分母の制限<10^9：48バイト：

=10^FIND("/",B1)/10-MID(B1,FIND("/",B1)+1,1E9)=0

ロジックの大部分はに分割されてい/ます。入力を個別に取得できる場合、16バイト：

=10^LEN(B1)-C1=0

エリクサー、81バイト

fn b->[n,d]=String.split b,"/";String.to_integer(d)==:math.pow 10,byte_size n end

オンラインでお試しください！

でどこかに到達できるかもしれ{n,"/"<>d}=Integer.parse bませんが、方法はわかりません。

2DFuck、86バイト

..!x..!...,,,,[>,,,,,,,,],,,,,,,,,[v!],[v!],[v!],![v!],,,[,,[v!],[v!],[v!],[v!]<,,,]r.

オンラインでお試しください！

整数部のない入力を受け取ります。

C（gcc / clang）、59 49 47バイト

f(a,b){a=atoi(b=strchr(a,47)+1)==pow(10,b+~a);}

ポートオブチャスブラウンのPython 2 回答。こちらからオンラインでお試しください。

入力の整数部分を無視します。ジョナサン・フレッシュに感謝2バイトのゴルフをしてます。

ゴルフをしていない：

f(a, b) { // function returning an int and taking a string as input; also declaring another string variable
          // this abuses the parameters as much as possible, omitting the type int and implicitly converting it to char *
    a =                             // return a truthy or falsey value based on
        atoi(b = strchr(a, 47) + 1) // the denominator (as integer; 47 is the ASCII code for '/')
        == pow(10, b + ~a);         // is equal to 10 to the power of the length of the numerator-string
}

ForceLang、86 78バイト

set a io.readnum()
set b io.readnum()
set d number.parse a+b+""
io.write d=a+b