ฉันคิดว่าเราทำสิ่งนี้ตั้งแต่ยังเด็ก: บางเว็บไซต์ต้องการอายุขั้นต่ำ 18 ปีดังนั้นเราจึงลบสองสามปีนับจากปีเกิดและvoilàเรามี '18+'
นอกจากนี้สำหรับการขี่ส่วนใหญ่ในสวนสนุกความสูงขั้นต่ำที่ต้องเข้าคือ 1.40 เมตร (ที่เนเธอร์แลนด์อย่างน้อยก็คือที่นี่) แน่นอนว่าสิ่งนี้สามารถโกงได้ง่ายกว่าอายุ แต่คุณสามารถสวมรองเท้าส้นหนาใส่ผมสวมหมวกยืนบนเท้า ฯลฯ

การป้อนข้อมูล:

โปรแกรม / ฟังก์ชั่นของคุณยอมรับจำนวนเต็มบวกหรือทศนิยม

เอาท์พุท:

• อินพุตเป็นจำนวนเต็ม>= 18หรือไม่ เพียงพิมพ์อินพุต
• อินพุตเป็นจำนวนเต็ม0-17หรือไม่ 18พิมพ์
• อินพุตเป็นทศนิยม>= 1.4หรือไม่? เพียงพิมพ์อินพุต
• อินพุตเป็นทศนิยม0.0-1.4หรือไม่? 1.4พิมพ์

กฏท้าทาย:

• สมมติว่าอินพุตจะอยู่ในช่วงของ0-122(หญิงที่เก่าแก่ที่สุดที่เคยเป็น 122) หรือ0.0-2.72(ผู้ชายที่สูงที่สุดที่เคยเป็น 2.72)
• คุณได้รับอนุญาตให้รับอินพุตเป็นสตริงวัตถุหรืออะไรก็ได้ที่คุณต้องการ
• อินพุตทศนิยมจะไม่มีทศนิยมมากกว่าสามตำแหน่งหลังจุดทศนิยม
• 2หรือทั้งสองไม่ได้ผลที่ถูกต้องสำหรับ2. 2.0คุณมีอิสระในการส่งออก2.00หรือ2.000แทน2.0อย่างไรก็ตาม
  เช่นเดียวกับอินพุทเอาท์พุทจะไม่มีทศนิยมมากกว่าสามตำแหน่งหลังจุด

กฎทั่วไป:

• นี่คือcode-golfดังนั้นคำตอบที่สั้นที่สุดในจำนวนไบต์ชนะ
  อย่าปล่อยให้ภาษาโค้ดกอล์ฟกีดกันคุณจากการโพสต์คำตอบด้วยภาษาที่ไม่ได้เข้ารหัส พยายามหาคำตอบสั้น ๆ ที่เป็นไปได้สำหรับภาษาโปรแกรม 'ใด ๆ '
• กฎมาตรฐานจะใช้สำหรับคำตอบของคุณดังนั้นคุณจึงได้รับอนุญาตให้ใช้ STDIN / STDOUT ฟังก์ชัน / เมธอดพร้อมพารามิเตอร์ที่เหมาะสมโปรแกรมเต็มรูปแบบ การโทรของคุณ
• ช่องโหว่เริ่มต้นเป็นสิ่งต้องห้าม
• หากเป็นไปได้โปรดเพิ่มลิงค์พร้อมทดสอบรหัสของคุณ
• นอกจากนี้โปรดเพิ่มคำอธิบายหากจำเป็น

กรณีทดสอบ:

0      ->  18
1      ->  18
2      ->  18
12     ->  18
18     ->  18
43     ->  43
115    ->  115
122    ->  122

0.0    ->  1.4
1.04   ->  1.4
1.225  ->  1.4
1.399  ->  1.4
1.4    ->  1.4
1.74   ->  1.74
2.0    ->  2.0
2.72   ->  2.72

นูน 9 ไบต์

_1ÛI1.4?»

ลองออนไลน์!

Python 2.7, 34 ไบต์

lambda x:max(x,[18,1.4]['.'in`x`])

JavaScript (ES6), 27 31

อินพุตนำมาเป็นสตริง ในการตรวจสอบว่าค่าอินพุตมีทศนิยมหรือไม่มันจะผนวกเข้ากับตัวเอง: หากไม่มีจุดทศนิยมผลลัพธ์จะยังคงเป็นตัวเลขที่ถูกต้องมิเช่นนั้นจะไม่มี ที่จะรับรู้ตัวเลขที่ถูกต้อง (รวม 0) ผมใช้แบ่งเป็นใน JavaScript 1/nเป็นตัวเลขไม่ได้ 0 สำหรับตัวเลขใด ๆn (ในที่สุดก็มีค่าเป็นInfinityสำหรับn==0) อื่นมันNaN

x=>x<(y=1/(x+x)?18:1.4)?y:x

ทดสอบ

f=    
x=>x<(y=1/(x+x)?18:1.4)?y:x

;[
 ['0', '18' ],['1', '18' ],['2', '18' ],['12', '18' ],['18', '18' ],['43', '43' ],['115', '115'], ['122', '122' ]
,['0.0', '1.4'],['1.0', '1.4'],['1.04', '1.4'],['1.225', '1.4'],['1.399', '1.4'],['1.4', '1.4'],['1.74', '1.74'],['2.0', '2.0'],['2.72', '2.72']
].forEach(t=>{
  var i=t[0],k=t[1],r=f(i)
  console.log(i,k,r,k==r?'OK':'KO')
})

โซลูชัน prev (ผิด) ของฉัน:

การป้อนข้อมูลเป็นตัวเลขคุณสามารถใช้ตัวดำเนินการส่วนที่เหลือ%เพื่อตรวจสอบว่าตัวเลขเป็นจำนวนเต็มหรือไม่

x=>x<(y=x%1?1.4:18)?y:x

หรือ

x=>Math.max(x,x%1?1.4:18)

แต่ตอนนี้ไม่ได้ทำงานตามคำขอของความท้าทายที่จะแยกแยะระหว่างการพูด, 2และ2.0และที่หมายเลขเดียวกัน ดังนั้นจึงไม่สามารถรับอินพุตเป็นตัวเลขได้

05AB1E , 13 11 ไบต์

ใช้การเข้ารหัสCP-1252

ÐîQ18*14T/M

คำอธิบาย

Ð             # triplicate input
 î            # round up
  Q           # check for equality
   18*        # multiply 18 by this (18 if input is int, else 0)
      14T/    # push 14 / 10
          M   # take max of stack (input and 1.4 or 18)

ลองออนไลน์

Java 8, 90 61 57 ไบต์

i->(i+"").contains(".")?(float)i<1.4?1.4:i:(int)i<18?18:i

-4 ไบต์กลับมาObjectแทนString; และไบต์เพิ่มเติมบางส่วนที่แปลง Java 7 เป็น 8
-4 ไบต์ใช้อินพุตObjectแทนStringเช่นกัน

คำอธิบาย:

ลองที่นี่

i->                      // Method with Object as both parameter and return-type
  (i+"").contains(".")?  //  If the input as String contains a dot:
   (float)i<1.4?         //   If the input is a float below 1.4:
    1.4                  //    Return double 1.4
   :                     //   Else:
    i                    //    Return the input-float as is
  :(int)i<18?            //  Else if the input is an integer below 18:
   18                    //   Return integer 18
  :                      //  Else:
   i                     //   Return the input-integer as is

Pyth, 14 ไบต์

eS,@,18h.4}\.`

ลองออนไลน์

PHP, 40 ไบต์

แก้ไขโดย @ user59178 ขอบคุณ

<?=max(is_int(0+$i=$argv[1])?18:1.4,$i);

PHP, รุ่นแรก 42 ไบต์

<?=max(strpos($i=$argv[1],".")?1.4:18,$i);

EXCEL: 26 31 29 ไบต์

=MAX(A1;IF(MOD(A1;1);1,4;18))

สูตรสามารถไปได้ทุกที่ยกเว้น A1 เซลล์ป้อนเข้า

แก้ไขข้อผิดพลาดและแทนที่ด้วยคำแนะนำของ Emigna

ขอบคุณ Alexandru ที่ช่วยฉันกู้ไบท์ด้วยความจริง

Brachylogขนาด 14 ไบต์

#$:18ot|:1.4ot

ลองออนไลน์!

คำอธิบาย

    #$             Input is an integer
      :18o         Sort the list [Input, 18]
          t        Take the last element
|              Or
    :1.4o          Sort the list [Input, 1.4]
         t         Take the last element

Perl, 29 27 ไบต์

รวมถึง +2 สำหรับ -lp

ให้อินพุตบน STDIN

adult.pl <<< 1.24

adult.pl:

#!/usr/bin/perl -lp
$_>($a=/\./?1.4:18)or*_=a

หากคุณไม่สนใจบรรทัดใหม่ที่เพิ่มขึ้นหากคุณเป็นผู้ใหญ่เต็มตัวแล้วออกจากlตัวเลือกสำหรับ 26 ไบต์ก็ใช้งานได้เช่นกัน

GNU sed, 40 + 1 = 41 bytes

(คะแนน +1 สำหรับการใช้-rธงเพื่อล่าม)

s/^.$|^1[^9]$/18/
/^0|1\.[0-3]/s/.*/1.4/

ข้อเขียน:

#!/bin/sed -rf

# First, anything that's a single digit or is '1' followed by a
# digit other than '9' is replaced with '18'.
s/^.$|^1[^9]$/18/

# Now, any line beginning with '0' or containing '1.0' to '1.3' is
# replaced with '1.4'.
/^0|1\.[0-3]/s/.*/1.4/

เราใช้ประโยชน์จากข้อ จำกัด ของอินพุตดังนั้นไม่ต้องทดสอบจุดเริ่มต้นของสตริงเมื่อเราเห็น '1' - เรารู้ว่ามีเพียงหนึ่งหลักก่อนจุดทศนิยม

ผลการทดสอบ:

$ ./94832.sed <<END
> 0
> 1
> 2
> 12
> 18
> 43
> 122
> 
> 0.0
> 1.04
> 1.225
> 1.399
> 1.4
> 1.74
> 2.0
> 2.72
> END
18
18
18
18
18
43
122

1.4
1.4
1.4
1.4
1.4
1.74
2.0
2.72

Haskell, 50 ไบต์

x#y=show$max x$read y 
f s|elem '.'s=1.4#s|1<2=18#s

ตัวอย่างการใช้งาน: ->f "1.0""1.6"

ประเภทที่เข้มงวดของ Haskell ต้องการการใช้สตริงเป็นอินพุตและเอาต์พุต Howevers, read, maxและshowมี polymorphic และจัดการกับชนิดของตัวเลขทั้งหมด

Java, 79 70 ไบต์

int f(int x){return x<18?18:x;}
float f(float x){return x<1.4?1.4f:x;}

กำหนดสองวิธีด้วยการโอเวอร์โหลดซึ่งใช้ตัวดำเนินการตามเงื่อนไข

เรียกว่าเหมือนหรือf(5)f(1.4f)

CJam, 18 14 ไบต์

บันทึกแล้ว 4 ไบต์ขอบคุณ Martin Ender

q~_`'.&1.4I?e>

ล่ามออนไลน์

C #, 69 ไบต์

s=>s.Contains(".")?float.Parse(s)<1.4?"1.4":s:int.Parse(s)<18?"18":s;

ลองออนไลน์!

โปรแกรมเต็มรูปแบบพร้อมกรณีทดสอบ:

using System;

namespace YesImAnAdult
{
    class Program
    {
        static void Main(string[] args)
        {
            Func<string,string>f= s=>s.Contains(".")?float.Parse(s)<1.4?"1.4":s:int.Parse(s)<18?"18":s;

            Console.WriteLine(f("0"));  //18
            Console.WriteLine(f("1"));  //18
            Console.WriteLine(f("2"));  //18
            Console.WriteLine(f("12")); //18
            Console.WriteLine(f("18")); //18
            Console.WriteLine(f("43")); //43
            Console.WriteLine(f("122"));    //122

            Console.WriteLine(f("0.0"));    //1.4
            Console.WriteLine(f("1.04"));   //1.4
            Console.WriteLine(f("1.225"));  //1.4
            Console.WriteLine(f("1.399"));  //1.4
            Console.WriteLine(f("1.4"));    //1.4
            Console.WriteLine(f("1.74"));   //1.74
            Console.WriteLine(f("2.0"));    //2.0
            Console.WriteLine(f("2.72"));   //2.72
        }
    }
}

ทางออกที่ตรงไปตรงมาสวย โปรดทราบว่าในบางระบบ float.Parse () อาจส่งคืนผลลัพธ์ที่ไม่ถูกต้อง ผ่านCultureInfo.InvariantCultureเป็นอาร์กิวเมนต์ที่สองตามคำตอบนี้

ภาษาสูตร IBM / Lotus Notes 58 49 ไบต์

@If(@Like(@Text(a);"%.%");@If(a<1.4;1.4;a);@If(a<18;18;a))

สูตรฟิลด์ที่คำนวณโดยที่ a คือฟิลด์ตัวเลขที่สามารถแก้ไขได้

แก้ไข

@If(@Like(@Text(a);"%.%");@Max(1.4;a);@Max(18;a))

ทางเลือกที่ได้แรงบันดาลใจจาก @Mego

เยลลี่ , 16 15 13 ไบต์

ŒṘċ”.ị1.4,18»

TryItOnline
หรือดูกรณีทดสอบทั้งหมดได้ที่ TryItOnline

อย่างไร?

ŒṘċ”.ị1.4,18» - Main link: n
      1.4,18 - pair literals 1.4 and 18:   [1.4,18]
     ị       - index (1-based & modular ie:^  1, 0^)
  ċ          -     count (occurrences of)
   ”.        -         string "." (present in)
ŒṘ           -         string representation of n
           » - maximum (of this and n)

C ++, 68 ไบต์

int A(int a){return a<18?18:a;}float A(float h){return h<1.4?1.4:h;}

คำตอบนี้เป็น 2 ฟังก์ชั่นที่มีชื่อเดียวกันและคอมไพเลอร์ทำงานได้ดีสำหรับฉันที่จะเรียกดังนั้นมันจึงทำหน้าที่เป็นหนึ่งฟังก์ชั่นโดยที่ฉันไม่จำเป็นต้องใส่ในอินพุตเดียวและตัดสินใจว่ามันคืออะไร เนื่องจากอินพุตบนจุดลอยตัวรับประกันว่ามีความแม่นยำเช่นเดียวกับเอาต์พุตฉันจึงสามารถส่งคืนได้อย่างปลอดภัยโดยไม่ต้องตัดทอน

Ungolfed + การทดสอบ

#include <iostream>

int A(int a)
{
   return a < 18 ? 18 : a;
}

float A(float h)
{
   return h < 1.4 ? 1.4 : h;
}

int main()
{
  std::cout << 0 << " " << A(0) << "\n";
  std::cout << 19 << " " << A(19) << "\n";
  std::cout << 1.1 << " " << A(1.1f) << "\n";
  std::cout << 2.2 << " " << A(2.2f) << "\n";
}

C #, 58 ไบต์

x=>x is int?(int)x>17?x:18:(float)x<1.4?"1.4":$"{x:.0##}";

ไม่ต้องใช้การวิเคราะห์สตริงบ้าสำหรับ C # การป้อนข้อมูลคาดว่าจะเป็นintหรือfloat(น่าเสียดายที่ C # ไม่สามารถส่งdoubleไปยังfloatหากdoubleอยู่ในobject) เอาท์พุทจะเป็นอย่างใดอย่างหนึ่งintหรือในstringobject

(เกือบพลาดข้อกำหนดทศนิยมอย่างน้อย 1 ข้อและเพิ่มเติมตอนนี้)

Ungolfed:

/*Func<object, object> Lambda = */ x =>
    x is int // if parameter is an int
        ? (int)x > 17 // check if x is at least 18
            ? x // at least 18 so return x
            : 18 // less than 18 so return 18
        : (float)x < 1.4 // x is float, check if at least 1.4
            ? "1.4" // less than 1.4 so return 1.4
            : $"{x:.0##"} // at least 1.4 so return x and ensure at least 1 decimal place
;

การใช้งานสำรองซึ่งเป็น 58 ไบต์

x=>x is int?(int)x>17?x:18:$"{((float)x<1.4?1.4:x):.0##}";

จริงแล้ว 16 ไบต์

;:.7τ9τ($'.íuIkM

ลองออนไลน์!

คำอธิบาย:

;:.7τ9τ($'.íuIkM
;                 dupe input
 :.7τ             1.4 (.7*2) - note that :1.4 is the same length, but an additional delimiter would be needed to separate it from the following 1
     9τ           18 (9*2)
       ($'.íu     1-based index of "." in string representation of input, 0 if not found
             I    1.4 if input contains a "." else 18
              kM  maximum of remaining values on stack 

Emacs Lisp, 37 ไบต์

(lambda(x)(max(if(floatp x)1.4 18)x))

คาดเดาจาก "ประเภทข้อมูล" ว่าควรใช้จำนวนเต็มหรือเวอร์ชันลอย ( floatpผลตอบแทนtสำหรับ1.0แต่ไม่1.) numberpพารามิเตอร์เป็นตัวเลขที่เป็นจำนวนเต็มหรือลอยคือมันควรจะตอบสนอง

Haskell, 49 ไบต์

x#y=show.max x.fst<$>reads y;f s=head$18#s++1.4#s

โดยพื้นฐานแล้วนี่เป็นครั้งแรกที่พยายามอ่านอินพุตเป็นจำนวนเต็มและเป็นสองเท่าหากล้มเหลว จากนั้นดำเนินการเปรียบเทียบกับการเปรียบเทียบพื้นฐานที่เกี่ยวข้อง

Dyalog APL , 14 ไบต์แสดงผลไม่ถูกต้องตามข้อกำหนดเพิ่มเติม

⎕IO←0ซึ่งเป็นค่าเริ่มต้นในหลาย ๆ ระบบ รับค่าสตริงเป็นอาร์กิวเมนต์

⍎⌈18 1.4⊃⍨'.'∘∊

⍎⌈ อาร์กิวเมนต์สูงสุดที่ประเมินและ

18 1.4⊃⍨ {18,1.4} เลือกโดย

'.'∘∊ ไม่ว่าจะเป็นข้อโต้แย้งที่มีระยะเวลา

C #, 95 ไบต์

แข็งแรงเล่นกอล์ฟ:

string y(string p){int a;return int.TryParse(p,out a)?a>17?p:"18":double.Parse(p)<1.4?"1.4":p;}

Ungolfed:

class YesOfCourseImAnAdult
  {
    public string y(string p)
    {
      int a;
      return int.TryParse(p, out a) ? a > 17 ? p : "18"
       : double.Parse(p) < 1.4 ? "1.4" : p;
    }
  }

กรณีทดสอบ:

var codeGolf = new YesOfCourseImAnAdult();
Console.WriteLine(codeGolf.y("0"));
Console.WriteLine(codeGolf.y("1"));
Console.WriteLine(codeGolf.y("2"));
Console.WriteLine(codeGolf.y("12"));
Console.WriteLine(codeGolf.y("18"));
Console.WriteLine(codeGolf.y("43"));
Console.WriteLine(codeGolf.y("122"));

Console.WriteLine(codeGolf.y("0.0"));
Console.WriteLine(codeGolf.y("1.04"));
Console.WriteLine(codeGolf.y("1.225"));
Console.WriteLine(codeGolf.y("1.399"));
Console.WriteLine(codeGolf.y("1.4"));
Console.WriteLine(codeGolf.y("1.74"));
Console.WriteLine(codeGolf.y("2.0"));
Console.WriteLine(codeGolf.y("2.72"));

เอาท์พุท:

18
18
18
18
18
43
122

1.4
1.4
1.4
1.4
1.4
1.74
2.0
2.72

AWK - 29 ไบต์

($0<c=$0~/\./?1.4:18){$0=c}1

การใช้งาน:

awk '{c=$0~/\./?1.4:18}($0<c){$0=c}1' <<< number

ทำการทดสอบกับgawkRHEL 6 ฉันลองกับทุกกรณีทดสอบโชคไม่ดีที่ฉันไม่มีAWKเครื่องที่เชื่อมต่ออินเทอร์เน็ตได้ดังนั้นจึงไม่สามารถคัดลอกวางได้

มีวิธีที่กะทัดรัดกว่านี้AWKหรือไม่

C, 50 ไบต์:

#define A(x)(x/2+(x+1)/2-x?x<1.4?1.4:x:x<18?18:x)

จำนวนไบต์รวมถึงการขึ้นบรรทัดใหม่ในตอนท้ายของนิยามแมโคร

ทดสอบ :

#define A(x)(x/2+(x+1)/2-x?x<1.4?1.4:x:x<18?18:x)
#include <assert.h>
int main() {
  assert(A(0) == 18);
  assert(A(1) == 18);
  assert(A(2) == 18);
  assert(A(12) == 18);
  assert(A(18) == 18);
  assert(A(43) == 43);
  assert(A(115) == 115);
  assert(A(122) == 122);
  assert(A(0.0) == 1.4);
  assert(A(1.04) == 1.4);
  assert(A(1.225) == 1.4);
  assert(A(1.399) == 1.4);
  assert(A(1.4) == 1.4);
  assert(A(1.74) == 1.74);
  assert(A(2.0) == 2.0);
  assert(A(2.72) == 2.72);
}

C #, 71 ไบต์

object A(object i){return i is int?(int)i>18?i:18:(double)i>1.4?i:1.4;}

ลองที่นี่

C, 119 111 105 100

m;f(char*s){float atof(),l=atof(s);for(m=s;*s&&*s++!=46;);puts(*s?l<1.4?"1.4":m:atoi(m)>18?m:"18");}

ทดสอบกับ

main(c,v)char**v;{
    f("0");
    f("1");
    f("2");
    f("12");
    f("18");
    f("44");
    f("115");
    f("122");
    f("0.0");
    f("1.04");
    f("1.225");
    f("1.339");
    f("1.4");
    f("1.74");
    f("2.0");
    f("2.72");
}

เอาท์พุต

18
18
18
12
18
44
115
122
1.4
1.4
1.4
1.4
1.4
1.74
2.0
2.72

แบตช์ 102 ไบต์

@set/ps=
@if %s:.=%==%s% (if %s% lss 18 set s=18)else if %s:~0,1%%s:~2,1% lss 14 set s=1.4
@echo %s%

ก่อนอื่นกำหนดว่าอินพุตเป็นจำนวนเต็มหรือไม่โดยตรวจสอบว่าการลบ.s ทั้งหมดมีผลกับสตริงหรือไม่ หากเป็นเช่นนั้นค่าจะถูกเปรียบเทียบอย่างง่ายดายกับ 18 มิฉะนั้นอักขระตัวแรกและตัวที่สามจะรวมกันเป็นตัวเลขซึ่งเทียบกับ 14

PHP: 40 ไบต์

$i=is_int($i)?$i>17?$i:18:$i>1.4?$i:1.4;

psuedocode (turnary ซ้อนกัน):

if (i is an integer) then 
  if (i is bigger than 17) then i=18 else i=i  
otherwise (its a decimal)   
  if (i is bigger than 1.4) then i=i else i=1.4 
end if