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

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


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

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

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

local p = {}

function p.getLmc(frame) --2数の最小公倍数を求める関数
	local num1 = tonumber(frame.args[1])
	local num2 = tonumber(frame.args[2])
	if num1 and num2 then
		if num1 == 0 or num2 == 0 then
			return 0
		end
		if num1 == num2 then
			return num1
		end
		local 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