Temukan tantangan aslinya di sini

Tantangan

Diberikan bilangan bulat, Zdalam kisaran -2^31 < Z < 2^31, output jumlah digit dalam angka itu (di basis 10).

Aturan

Anda tidak boleh menggunakan fungsi string apa pun (dalam kasus overloading, Anda tidak boleh melewatkan string ke fungsi yang bertindak sebagai fungsi string dan integer). Anda tidak diizinkan menyimpan nomor tersebut sebagai string.

Semua fungsi matematika diizinkan.

Anda dapat mengambil input di basis apa pun, tetapi output harus panjang dari angka di basis 10.

Jangan hitung tanda minus untuk angka negatif. Angka tidak akan pernah menjadi desimal.

Nol secara efektif nol di depan, sehingga dapat memiliki nol atau satu digit.

Contohnya

Input > Output

-45 > 2
1254 > 4
107638538 > 9
-20000 > 5
0 > 0 or 1
-18 > 2

Kemenangan

Kode terpendek dalam byte menang.

Mathematica, 13 byte

IntegerLength

Baik...

Python 2 , 30 byte

f=lambda x:x and-~f(abs(x)/10)

Cobalah online!

Japt , 5 3 byte

ì l

Cobalah online!

JavaScript (ES6), 19 byte

f=n=>n&&f(n/10|0)+1

console.log(f(-45))       // 2
console.log(f(1254))      // 4
console.log(f(107638538)) // 9
console.log(f(-20000))    // 5
console.log(f(0))         // 0
console.log(f(-18))       // 2

Jelly , 3 2 byte

1 byte disimpan berkat Leaky Nun

DL

Cobalah online!

Penjelasan

 L    Length of
D     Decimal expansion of input argument. Works for negative values too

Jawaban saya dari tantangan lain masih berfungsi:

Brachylog , 1 byte

l

Cobalah online!

The lbuiltin kelebihan beban, tetapi pada bilangan bulat, dibutuhkan jumlah digit dari bilangan bulat, mengabaikan tanda.

Chaincode , 5 byte

pqL_+

Catatan: Ini persis kode yang sama dengan yang dari tantangan lain

Penjelasan

pqL_+ print(
    +   succ(
   _      floor(
  L        log_10(
pq           abs(
               input())))))

dc , 1 byte

Z

Cobalah online!

Tidak menggunakan builtin, 18 byte:

[d10/d0!=F]dsFxz1-

Cobalah online!

SILOS , 41 byte

readIO
i|
lblb
i/10
a+1
if i b
printInt a

Cobalah online!

Pengembalian 1untuk 0.

Lua , 40 byte

Port dari jawaban python saya

print(math.log10(math.abs(10*...)+1)//1)

Cobalah online!

Java 8, 61 59 39 37 byte

n->n==0?1:(int)Math.log10(n<0?-n:n)+1

Port dari jawaban C # @TheLethalCoder , tetapi tanpa Math.floorkarena menggunakan (int)-cast secara otomatis lantai / memotong desimal di Jawa.

Cobalah online.

Java 7 rekursif jawaban ( 61 38 byte ):

int c(int n){return n!=0?1+c(n/10):0;}

Pelabuhan @ Khaled.K 's C jawabannya .

Cobalah online.

C #, 49 56 byte

namespace System.Math{n=>n==0?1:Floor(Log10(Abs(n))+1);}

Alice , 16 byte

/O
\I@/Hwa:].$Kq

Cobalah online!

Penjelasan

/O
\I@/...

Ini hanyalah kerangka kerja untuk input numerik → pemrosesan matematika → output numerik.

Sisa kode adalah algoritma nyata:

Hwa:].$Kq
H            Compute absolute value
 w   .$K     While the result is not zero do:
  a:           divide the number by 10
    ]          move the tape head one cell forward
        q    Get the position of the tape head

Python 2 , 48 byte

-3 Berkat ovs -1 berkat pizza

lambda x:math.log10(abs(10*x)+1)//1
import math

Cobalah online!

C, 27 byte

Coba Online

f(n){return n?1+f(n/10):0;}

C (gcc), 22 byte

f(n){n=n?1+f(n/10):0;}

Menggunakan matematika, 29 byte

f(n){return 1+log10(abs(n));}

R , 40 byte

function(x)max(ceiling(log10(abs(x))),0)

Cobalah online!

MATL , 5 byte

|OYAn

Cobalah online!

Penjelasan

|     % Implicitly input a number. Absolute value
OYA   % Convert to array of decimal digits
n     % Length. Implicitly display

05AB1E , 6 byte

Ä>T.nî

Cobalah online! atau Coba semua tes

Ä      # Absolute value
 >     # Increment
  T.n  # Log base 10
     î # Round up

Jelly , 5 byte

A‘l⁵Ċ

Cobalah online!

Oktaf , 27 byte

@(x)fix(log10(abs(x+~x)))+1

Cobalah online!

PHP, 23 Bytes

<?=-~log10(abs($argn));

Cobalah online!

PowerShell, 52 51 Bytes

$m=[math];$m::Floor($m::Log10($m::Abs($args[0])))+1

Terima kasih kepada Felipe karena telah memperbaiki Masalah dengan Log10, dan memberikan penghematan 1byte.

Setiap System.Mathpanggilan sangat mahal di PowerShell.

Menggunakan metode untuk mendapatkan Log10 dari Nilai Abs input, dan mengumpulkannya.

QBIC , 25 byte

≈abs(:)>=1|b=b+1┘a=a/z}?b

Ini membagi input dengan 10, dan melacak berapa kali kita bisa melakukan ini sampai N<1.

Penjelasan:

≈abs(:)>=1| : gets cmd line input, 
            ≈ starts a while loop,
            abs() is literal QBasic code and is for cases with negative n
            | is the terminator to the WHILE-condition
b=b+1       Keep track of the # of divisions        
┘           Syntactic line break
a=a/z       Divide a by 10 (z==10 in QBIC)
}           End WHILE-loop body
?b          PRINT b

Bash , 50 byte

a=$1;until [ $a -eq 0 ];{ let i++ a=a/10;};echo $i

Cobalah online!

Tidak ada perintah string / array, hanya menghitung digit dengan pembagian integer.

Ruby , 33 byte

->x{1+Math.log10(x.abs+0.1).to_i}

Cobalah online!

bc , 6 byte

length

Fungsi bawaan.

Sebenarnya , 8 byte

;0=+A╥Lu

Cobalah online!

Penjelasan:

;0=+A╥Lu
;0=       is input equal to 0?
   +      add 1 if input is 0, else add 0
    A     absolute value
     ╥L   log base 10, floor
       u  increment

Program ini menghitung secara efektif floor(log10(x))+1. Untuk berurusan dengan log(0)tidak terdefinisi (sebenarnya mengembalikan (-inf+nanj)yang merupakan cara khusus untuk mengatakan itu tidak terdefinisi), input bertambah jika 0sebelum menghitung panjangnya. Dengan demikian, 0dianggap memiliki panjang 1.

Pari / GP , 13 byte

n->#digits(n)

Cobalah online!

Ruby, 27 byte

f=->x{x==0?0:1+f[x.abs/10]}

Sebagai tes:

tests = [[-45 , 2],
         [1254 , 4],
         [107638538 , 9],
         [-20000 , 5],
         [0 , 0 ],
         [-18 , 2]]

tests.each do |i, o|
  p f.call(i) == o
end

Ini menghasilkan:

true
true
true
true
true
true

Perl 5 -p , 26 byte

$\++;abs($_/=10)<1||redo}{

Cobalah online!