兩個數相乘

兩個數相乘

option base 1

private sub command1_click()

dim m as string

dim n as string

m = trim(text1.text)

n = trim(text2.text)

dim number1() as byte

dim number2() as byte

redim number1(len(m))

redim number2(len(n))

dim index as byte

for index = 1 to len(m) step 1

number1(index) = mid(m, index, 1)

next index

for index = 1 to len(n) step 1

number2(index) = mid(n, index, 1)

next index

dim result() as byte

redim result(len(m) + len(n))

dim mcarry as byte

dim acarry as byte

dim remainder as integer

dim i as integer, j as integer

dim mtemp as integer, atemp as integer

for i = len(n) to 1 step -1

for j = len(m) to 1 step -1

mtemp = number1(j) * number2(i) + mcarry

mcarry = mtemp \ 10

remainder = mtemp mod 10

atemp = remainder + result(i + j) + acarry

acarry = atemp \ 10

result(i + j) = atemp mod 10

next j

result(i) = mcarry + acarry

mcarry = 0

acarry = 0

next i

dim mstr  as string

for index = 1 to len(n) + len(m)

mstr = mstr & str(result(index))

next

label3.caption = mstr

end sub

end sub

關於兩個數相乘, 求其為多少進製

今天和大家來說說，我前幾天碰到的一道公司的筆試題，這道題並不是我們所學的語言知識這一方面的，在筆試中碰到這種題的機率還是挺大的，若用普通的方法去算，不是不可以，結果就是乙個，卷子絕對是答不完的 大神們除外哈 題目是這樣的 假設在n進製下，下面的等式成立，567 456 150216，n的值是 a 9...

兩個大數相乘

兩個大數相乘 2007 08 27 00 35 question 1 用乙個整型陣列表示乙個大數,陣列的每個元素儲存大數的一位數字,則實際的大數d表示為 d a k 10的k 1次冪 a k 1 10的k 2次冪 a 2 10 a 1 其中a 0 儲存該大數的位數 實現兩個大數相乘 再此基礎上實現兩...

兩個大數相乘

兩個大數相乘 char multiply char char 給了兩個字串，每個都是代表了乙個很長的10進製表示的數 比如 char str1 23456789009877666555544444 char str2 346587436598437594375943875943875 最後求出他們的...