Viết thuật toán nhân nhanh nhất (big-O tốt nhất) và nhỏ nhất cho các số nguyên dương, mà không sử dụng các toán tử nhân. Bạn chỉ được phép cộng, trừ, các hàm logic (AND, OR, XOR, KHÔNG), dịch chuyển bit, xoay bit, lật / đặt / xóa bit và kiểm tra bit. Chương trình của bạn phải có khả năng nhân các số 16 bit để tạo ra kết quả 32 bit. Lấy đầu vào trên stdin, phân tách bằng dấu phẩy, dấu cách hoặc dòng mới (lựa chọn của bạn), nhưng làm rõ cách nhập dữ liệu.

Ví dụ đầu vào / đầu ra:

734 929
681886

C, 84 83 78 Ký tự

m;main(a,b){for(scanf("%d%d",&a,&b);a;b+=b)a&1?m+=b:0,a>>=1;printf("%d\n",m);}

Ở dạng dễ đọc hơn

m;main(a,b)
{
    scanf("%d%d",&a,&b);
    while (a)
    {
        if (a&1)
           m+=b;
        a>>=1;
        b+=b;
    }
    printf("%d\n",m);
}

Thuật toán được biết đến nhiều hơn với tên gọi là phép nhân của người Ê-ti-ô hoặc phép nhân nông dân Nga. Đây là thuật toán:

1. Đặt hai số được nhân là a và b.
2. Nếu a bằng 0 thì ngắt và in kết quả.
3. Nếu a là số lẻ thì thêm b vào kết quả.
4. Nửa a, Đôi b. Bước 2.

APL (5)

Đưa đầu vào vào đầu vào tiêu chuẩn được phân tách bằng dòng mới.

+/⎕⍴⎕

Golfscript - 12 nhân vật

~0\{1$+}*\;

Xin lưu ý rằng *ở đây không phải là toán tử nhân, thay vào đó là toán tử lặp lại, hãy xem cách sử dụng thứ hai ở đây .

Golfscript - 27 ký tự

Nông dân nhân lên. Có * đầu tiên trong đó là một nhân, nhưng chỉ bằng 0 hoặc 1

~2base-1%{1&\..+\@*}%{+}*\;

Đây là lúc 31 ký tự không nhân lên chút nào

~2base-1%{1&\..+\[0\]@=}%{+}*\;

Python, 64 ký tự

Có lẽ không phải là hiệu quả nhất mặc dù (hoặc tuân thủ nhất, nhưng tôi đang "thêm", phải không?):

a=int(raw_input())
print sum(a for i in range(int(raw_input())))

Hồng ngọc, 30

->(a){Array.new(*a).inject:+}

Dựa trên câu trả lời của GigaWat .

Golf - 43

~\:@;0 1{.3$&{\@+\}{}if@@+:@;.+.3$>!}do;\;

Thực hiện phép nhân nông dân . Tôi nghĩ rằng tôi có thể chơi golf thêm một số lần sau.

J, 18 17 ký tự

+/({.${:)".1!:1]3

Đầu vào cần phải được phân tách không gian.

Python, cũng 64 ký tự

m=lambda x,n:0 if n==0 else x+m(x,n-1);print m(input(),input())

VBA, 70 ký tự

Điều này thực sự khá chậm đối với số lượng lớn, nhưng nó nhỏ. Tôi quản lý để cải thiện kích thước mã trong khi cải thiện tốc độ. Thời gian tính toán khác nhau, tùy thuộc vào vị trí đối số - không chỉ kích thước. (tức là 1000, 5000 tính toán trong khoảng 4 giây trong khi 5000, 1000 tính toán trong khoảng 19) Vì OP liệt kê cả nhanh và nhỏ, tôi cho rằng tôi sẽ đi với cái này. Đầu vào là hai đối số số, được phân tách bằng dấu phẩy.

Sub i(j,k)
For m=1 To j:n=n & String(k," "):Next
MsgBox Len(n)
End Sub

Phiên bản dài hơn này ( 103 ký tự ) sẽ đảm bảo nó chạy với tốc độ nhanh hơn trong hai cách sắp xếp có thể:

Sub i(j,k)
If j<k Then a=j:b=k Else b=j:a=k
For m=1 To a:n=n & String(b," "):Next
MsgBox Len(n)
End Sub

Perl: 52 ký tự

Đây là một câu hỏi cũ, nhưng Perl cần được đại diện:

perl -pl '($m,$n,$_)=split;$_+=$m&1&&$n,$m>>=1,$n<<=1while$m'

(Đây là thuật toán nhị phân; lặp Ngoài ra là nhỏ hơn nhưng cách quá nhàm chán.)

Chương trình này bao gồm một tính năng không chủ ý: nếu dòng đầu vào của bạn chứa số thứ ba, chương trình sẽ thực sự tính A * B + C.

Một biến thể trong Scala, được tối ưu hóa cho kích thước: 48 ký tự

def m(a:Int,b:Int):Int=if(b==1)a else a+m(a,b-1)

tối ưu hóa cho tốc độ một chút:

def mul (a:Int, b:Int) : Int = {
  print (".")
  if (a == 1) b
  else if (a > b) mul (b, a)
  else if (a % 2 == 0) mul (a >> 1, b << 1) 
  else b + mul (a - 1, b) 
}

Tôi trao đổi (a, b) nếu (a> b), để đạt được kết thúc nhanh hơn. Sự khác biệt là 11 đến 20 bước, khi gọi mul (1023,31), so với việc bỏ qua dòng mã đó.

đánh gôn: 95 ký tự:

def m(a:Int,b:Int):Int=if(a==1)b
else if(a>b)m(b,a)
else if(a%2==0)m(a>>1,b<<1)
else b+m(a-1,b)

K, 18 16

{#,/(!y),\:/:!x}

.

k){#,/(!y),\:/:!x}[4;20]
80
k){#,/(!y),\:/:!x}[13;21]
273
k){#,/(!y),\:/:!x}[3;6]
18

Ruby, 35 ký tự

p $*.map!(&:to_i).pop*$*.inject(:+)

Đây là một chương trình , nhận đầu vào và đầu ra, không chỉ là một chức năng.

.-(~/virt)-----------------------------------------------------------------------------------------------------------------------------------------------------(ice@distantstar)-
`--> wc -c golf.rb         
35 golf.rb
.-(~/virt)-----------------------------------------------------------------------------------------------------------------------------------------------------(ice@distantstar)-
`--> ruby ./golf.rb 734 929
681886

Ruby, 35 byte

def x(a)Array.new(*a).inject :+end

Sử dụng: x([123, 456]) #=> 56088

Có thể rút ngắn nếu các số được đọc từ ARGV, nhưng nó phàn nàn về chúng là định dạng sai (chuỗi, không phải ints). Bất kỳ đề xuất nào cũng sẽ rất tuyệt.

Toán học 12

Các #2trường hợp sau đây của #1.

Mã

#1~Sum~{#2}&

Sử dụng

#1~Sum~{#2} &[734, 929]

(* out *)

681886

9 ký tự?

Nếu các thông số chương trình, a, b, có thể được sử dụng cho đầu vào, kết quả tương tự có thể đạt được với 9 ký tự .

a~Sum~{b}

VB11, 101 ký tự

   Dim m As Func(Of Integer, Integer, Integer, Integer) = Function(a, b, t) If(a = 0, t, m(a >> 1, b << 1, t + If(a Mod 2 = 1, b, 0)))