「モジュール:数学」の版間の差分

提供:WikiWiki
ナビゲーションに移動 検索に移動
編集の要約なし
編集の要約なし
2行目: 2行目:


function p.getLmc(num1, num2) --2数の最小公倍数を求める関数
function p.getLmc(num1, num2) --2数の最小公倍数を求める関数
if type(num1) == number and type(num2) == number then
num1 = tonumber(num1)
num2 = tonumber(num2)
if num1 and num2 then
if num1 == 0 or num2 == 0 then
if num1 == 0 or num2 == 0 then
return 0
return 0
10行目: 12行目:
end
end
a, b = 1
a, b = 1
while num1 ~= num2 do
while a*num1 ~= b*num2 do
if a*num1 > b*num2 then
if a*num1 > b*num2 then
b = b + 1
b = b + 1
17行目: 19行目:
end
end
end
end
return num1
return a*
num1
else
else
return "'''関数 getLmc: 引数には数値のみを入力してください。'''"
return "'''関数 getLmc: 引数には数値のみを入力してください。'''"

2年8月15日 (W) 17:14時点における版

このモジュールについての説明文ページを モジュール:数学/doc に作成できます

local p = {}

function p.getLmc(num1, num2) --2数の最小公倍数を求める関数
	num1 = tonumber(num1)
	num2 = tonumber(num2)
	if num1 and num2 then
		if num1 == 0 or num2 == 0 then
			return 0
		end
		if num1 == num2 then
			return num1
		end
		a, b = 1
		while a*num1 ~= b*num2 do
			if a*num1 > b*num2 then
				b = b + 1
			else
				a = a + 1
			end
		end
		return a*
		num1
	else
		return "'''関数 getLmc: 引数には数値のみを入力してください。'''"
	end
end

return p