Đây là một nhiệm vụ đơn giản. Cho một số thực dương hoặc âm, làm tròn nó đến toàn bộ số nguyên tiếp theo gần bằng 0.

Các thách thức

• Đưa đầu vào thông qua bất kỳ hình thức hợp lý nào (stdin, hàm, v.v.) của một số thực dương hoặc âm.

• Làm tròn số này "về không" - điều này có nghĩa là nếu nó dương thì bạn sẽ làm tròn xuống và nếu nó âm thì bạn sẽ làm tròn số.

• Trả lại số hoặc xuất nó ra bàn điều khiển.

Các trường hợp thử nghiệm

 1.1   =>  1
-1.1   => -1
 500.4 =>  500
-283.5 => -283
 50    =>  50
-50    => -50

Quy tắc

• Đây là môn đánh gôn , vì vậy điểm số tối thiểu tính bằng byte thắng.

• Hãy chú ý đến những sơ hở tiêu chuẩn .

Chúc vui vẻ! _{^{sắp có thêm nhiều thử thách của Jimmy}}

Thạch , 1 byte

r

Một chương trình đầy đủ (dưới dạng Liên kết đơn âm, nó trả về một danh sách có độ dài).

Hãy thử trực tuyến!

Làm sao?

r - Main Link: number, X           e.g. -7.999
r - inclusive range between left (X) and right (X) (implicit cast to integer of inputs)
  -  = [int(X):int(X)] = [int(X)]       [-7]
  - implicit (smashing) print            -7

Python 3 , 3 byte

int

Hãy thử trực tuyến!

Cắt các chữ số sau dấu thập phân.

LƯU Ý: Đây là một câu trả lời tầm thường. Xin hãy xem các câu trả lời khác trước khi nâng cao

Python 2 , 3 byte

int

Hãy thử trực tuyến!

Perl 5 -p056l15 , 2 byte

<>

Hãy thử trực tuyến!

Làm thế nào mà làm việc?

-056   # (CLI) Make "." the input record separator
-l15   # (CLI) Make "\n" the output record separator
       # (otherwise it would use the input separator)
-p     # (CLI) Implicitly read $_ from STDIN
<>     # Read the second input field and do nothing with it
-p     # (CLI) Output $_ to STDOUT

Hoặc nếu bạn thích một câu trả lời truyền thống hơn:

Perl 5 , 6 byte

$_=int

Hãy thử trực tuyến!

Mê cung & Hexagony , 3 byte

Cảm ơn FryAmTheEggman đã chỉ ra rằng tôi đã viết một số Hexagony!

?!@

Hãy thử trực tuyến! & Hãy thử trực tuyến!

Làm sao?

Labyrinth và Hexagony đều sẽ cho bạn biết sớm nhất có thể! ...

? - read and discard from STDIN until a digit, a - or a + is found. Then read as many characters as possible to form a valid (signed) decimal integer and push its value
! - pop a value and write its decimal representation to STDOUT
@ - exit the labyrinth

Brainfuck , 26 byte

,[.+++++[->+++++<]>+[,>]<]

Hãy thử trực tuyến!

Đầu ra có dấu .nếu số là số thập phân

Không có nhiều cách chơi golf cụ ​​thể, ngoại trừ việc thay vì trừ 46 để kiểm tra xem một nhân vật có phải là một không ., tôi thêm 5 và nhân với 5 để có 255, sau đó thêm một lần nữa để chuyển sang không. Trừ 3, nhân với 6 và trừ 2 là cùng một tổng số

C (tcc), 39 21 10 byte

Tôi thực sự khá ngạc nhiên khi không ai nghĩ đến việc sử dụng C.

f(float i){}

Đây không phải là một chức năng nhận dạng như nó có vẻ là. Kiểu int ngầm định của hàm f chấm dứt dấu phẩy động.

TIO

Ít có khả năng lừa mọi người nhưng có độ dài byte ngắn hơn:

f(int i){}

TIO

J , 6 byte

**<.@|

Hãy thử trực tuyến!

Ký *lần lần *làm tròn xuống <.giá trị tuyệt đối@|

Perl 6 , 4 byte

*+|0

Chức năng ẩn danh.

Hãy thử trực tuyến!

Java (OpenJDK 8) , 15 byte 9 byte

s->(int)s

Hãy thử trực tuyến!

cảm ơn @ kevin-cruijssen

Excel, 10 byte

=TRUNC(A1)

TRUNC cắt một số thành một số nguyên bằng cách loại bỏ phần phân số của số đó.

R , 13 5 byte

Cảm ơn Robin Ryder

trunc

Hãy thử trực tuyến!

Võng mạc 0.8.2 , 5 byte

\..*

Hãy thử trực tuyến! Liên kết bao gồm các trường hợp thử nghiệm.

Ruby , 11 byte

proc &:to_i

Tôi đã chọn cái này bởi vì nó phân biệt chính nó với lambdas mà những người chơi golf Ruby thường sử dụng (may mắn thay, nó có cùng một quy tắc như giải pháp "truyền thống"):

->n{n.to_i}

Hãy thử trực tuyến!

ReRegex , 12 byte

\..+//#input

Hãy thử trực tuyến!

ReRegex là một ngôn ngữ lập trình phù hợp và thay thế nhiều lần cho đến khi không có kết quả khớp.

MATCH
    \.                                      The literal period/full stop char
    .+                                      Followed by one or more characters
REPLACE
    (nothing)                               Equivalent to removing the input
STRING TO REPEATEDLY MATCH/REPLACE UNTIL THERE ARE NO MATCHES
    #input                                  The input

JavaScript, 6 byte

x=>x^0

Hãy thử trực tuyến!

JavaScript, 8 byte

Sử dụng tích hợp dài hơn 2 byte ...

parseInt

Hãy thử trực tuyến!

K (oK) , 3 byte

`i$

Hãy thử trực tuyến!

Mã máy Intel 8087 FPU, 14 byte

D9 2E 010C      FLDCW CW_RNDZ   ; modified CW register for round towards zero
D9 06 010E      FLD  A          ; load single precision value A into ST(0)
DF 16 0112      FIST B          ; store integer value of ST(0) into B

CW_RNDZ   DW    0F7FH           ; control word to round down

Đầu vào là giá trị chính xác đơn ở vị trí bộ nhớ A(a DD), đầu ra là giá trị nguyên tại vị trí bộ nhớ B(aDW ).

Trước tiên, 8087 phải được đặt thành vòng tròn về chế độ 0 bằng cách đặt từ điều khiển ( 0F7FH). Sau đó tải giá trị dấu phẩy động và lưu lại thành một số nguyên.

Đỏ , 4 byte

to 1

Hãy thử trực tuyến!

Chỉ cần chuyển đổi float thành một số nguyên (chuyển đổi theo nguyên mẫu)

Zsh , 10 byte

<<<$[0^$1]

xorvới 0. Tôi đã gặp điều này trong một thử thách khác gần đây . Hãy thử trực tuyến!

Không hoạt động trong Bash hoặc POSIX sh (dấu gạch ngang).

V (vim) , 4 byte

Á.#D

Hãy thử trực tuyến!

Cảm ơn @DJMcMayhem , đã lưu 1 byte.

Keg ,19 17 13 byte

Điều này xuất ra một số ký tự không thể in dấu. Ngoài ra, điều này thoát với một lỗi. (Bây giờ chúng tôi cần đầu vào đảo ngược!)

?'(:\.>')"([,

Khoảng trắng (với trình biên dịch vii5ard ), 18 17 byte

[S S N
_Push_0][S N
S _Duplicate_0][T   N
T   T   _Read_STDIN_as_integer][T   T   T   _Retrieve_input][T  N
S T _Print_as_integer]

Chữ cái S(dấu cách), T(tab) và N(dòng mới) được thêm vào dưới dạng chỉ tô sáng.
[..._some_action]chỉ thêm vào giải thích.

Hãy thử trực tuyến. Bạn sẽ phải tự sao chép-dán mã (lưu ý rằng SE chuyển đổi các tab thành một loạt khoảng trắng!) Để chạy mã tại trình biên dịch vii5ard trực tuyến vii5ard. Khi nhấp vào chạy, nó sẽ yêu cầu đầu vào (nghĩa là -285.5) và sau khi nhấp vào, nó sẽ tiếp tục và xuất ra-283 .

Giải thích bằng mã giả:

Integer i = STDIN as integer
Print i as integer

Khoảng trắng chỉ có thể sử dụng I / O làm số nguyên hoặc ký tự đơn, vì vậy trong trường hợp này, nó sẽ đọc đầu vào dưới dạng số nguyên và bỏ qua bất kỳ ký tự dấu nào khác. Tức là -283.5hoặc -283abc5cả hai sẽ là đầu vào (và do đó đầu ra) là-283 .

Thật không may, điều này ở trên không hoạt động trên TIO vì hai lý do (tất cả các trình biên dịch Whitespace hơi khác nhau ..):

1. Nó sẽ no parsebáo lỗi khi chúng ta cố đọc đầu vào dưới dạng số nguyên, đây không phải là số nguyên hợp lệ. Vì vậy, thay vào đó, chúng tôi sẽ đọc một ký tự một lần và dừng (có lỗi) ngay khi chúng tôi gặp phải .hoặc không có thêm đầu vào (tức là 50/-50 ).
2. Trong trình biên dịch vii5ard, bạn cũng có thể ấn 0 chỉ SSNtrong khi trên TIO, nó yêu cầu thêm Shoặc T: SSSN/ SSTN. Đầu tiên Slà Kích hoạt thao tác ngăn xếp ; thứ hai Slà Đẩy cái gì sau số nguyên ; thứ ba S/ Tlà tích cực / tiêu cực tương ứng; và bất kỳ S/ Tsau đó (theo sau là N) là số chúng tôi muốn đẩy ở dạng nhị phân, ở đâu S=0và T=1. Đối với số nguyên 0, phần nhị phân này không thành vấn đề, vì nó là 0 theo mặc định. Nhưng trên TIO, chúng tôi vẫn phải chỉ định dương / âm và với hầu hết các trình biên dịch khoảng trắng khác như vii5ard thì không.

Khoảng trắng (với trình biên dịch TIO ), 48 byte

[N
S S N
_Create_Label_LOOP][S S S N
_Push_0][S N
S _Duplicate_0][T   N
T   S _Read_STDIN_as_character][T   T   T   _Retrieve_input][S N
S _Duplicate_input][S S S T S T T   T   S N
_Push_46_.][T   S S T   _Subtract][N
T   S S N
_If_0_Jump_to_Label_EXIT][T N
S S _Print_as_character][N
S N
N
_Jump_to_Label_LOOP]

Chữ cái S(dấu cách), T(tab) và N(dòng mới) được thêm vào dưới dạng chỉ tô sáng.
[..._some_action]chỉ thêm vào giải thích.

Dùng thử trực tuyến (chỉ có không gian thô, tab và dòng mới).

Giải thích bằng mã giả:

Start LOOP:
  Character c = STDIN as character
  If(c == '.'):
    Exit program
  Print c as character
  Go to the next iteration of LOOP

Pip , 5 byte

a//:1

Hãy thử trực tuyến!

C # (Trình biên dịch tương tác Visual C #) , 9 byte

n=>(int)n

Hãy thử trực tuyến!

Scala , 7 byte

_.toInt

Hãy thử trực tuyến!

05AB1E , 1 byte

ï

Trong phiên bản kế thừa (được viết bằng Python), castin thành số nguyên hoạt động như mong đợi để cắt bớt các giá trị thập phân.

Hãy thử trực tuyến.

Trong phiên bản mới của 05AB1E (viết bằng Elixir), nó chỉ hoạt động trên các chuỗi (mặc dù tất cả các số nguyên / số thập phân / chuỗi đều có thể hoán đổi cho nhau, trừ khi sắp xếp từ vựng và số chẳng hạn). Đoán tôi có thể báo cáo lỗi cho @Adnan ..

Hãy thử trực tuyến để so sánh đầu vào số nguyên / thập phân (cho kết quả không chính xác) với đầu vào chuỗi (cho kết quả chính xác).

Aheui (bí truyền) , 9 byte

방망희

Hãy thử trực tuyến!

Ý tưởng cơ bản từ câu trả lời tam giác (hoặc bất kỳ ngôn ngữ nào khác lấy đầu vào số là số nguyên).

Sự thật thú vị. 방망희(phát âm bang-mang-heui( acủa ark)) âm gần giống như 방망이(phát âm bang-mang-i( acủa ark, inghe giống như E), có nghĩa là dơi.

Nó làm việc như thế nào?

방 lấy số là số nguyên.

망 in giá trị dưới dạng số.

희 chấm dứt chương trình.

PowerShell , 19 byte

$args-replace'\..*'

Hãy thử trực tuyến!

PowerShell theo mặc định thực hiện làm tròn số ngân hàng , điều này hoàn toàn trái ngược với số lượng ngôn ngữ khác làm tròn số. Vì vậy, theo truyền thống, chúng tôi sẽ sử dụng [Math]::Truncate()để loại bỏ dấu thập phân và bất kỳ phần thập phân nào và đạt được làm tròn "về 0" mà chúng tôi quan tâm ở đây. Tuy nhiên, điều đó hơi dài, vì vậy bằng cách sử dụng mẹo này , chúng ta có thể làm tròn về 0 bằng cách ngầm định nhập đầu vào thành một chuỗi, thực hiện một biểu thức chính quy -replaceđể loại bỏ giai đoạn và bất cứ điều gì sau đó và để đầu ra trên đường ống cho in ngầm.

Hình tam giác , 3 byte

$.%

Hãy thử trực tuyến!

Tam giác lấy đầu vào số là số nguyên; bất kỳ giá trị thập phân được cắt ngắn. Nếu chấp nhận để lại đầu vào trên ngăn xếp mà không in, thì giải pháp này có thể là:

Hình tam giác , 1 byte

$

Hãy thử trực tuyến!