第９講 ユークリッド互除法

第６話 ユークリッド互除法を利用した最小公倍数の計算

を実現するプログラム例
#! ruby -Ks
def f(a,b)
　a=a%b;
　if a==0 then
　　return b
　end
　f(b,a);
end
def g(a,b)
　if b>a then
　　w=a
　　a=b
　　b=w
　end
end
a=0
while a==0
　a=rand(100)
end
b=0
while b==0
　b=rand(100)
end
c=0
while c==0
　c=rand(100)
end
d=0
while d==0
　d=rand(100)
end
e=a*b
f=c*d
print "(",e,",",f,")の最の最小公倍数は"
g(e,f)
w=f(e,f)
print e*f/w,"です。\n"

参考ダウンロード添付ファイル

次ぎに、最小公倍数を利用して
分数の足し算ａ／ｃ＋ｂ／ｄ
を考えましょう。

第５話へ　第７話へ

eclipse c++ 入門
魔方陣 数独で学ぶ VBA 入門
数独のシンプルな解き方・簡単な解法の研究
vc++講義へ
vba 2013 2010 2007 入門へ
ＶＢ講義基礎へ
初心者のための世界で一番わかりやすいVisual C++入門基礎講座へ
初心者のための世界で一番わかりやすいVisual Basic入門基礎講座へ
専門用語なしの C言語 C++ 入門（Visual C++ 2010で学ぶ C言語 C++ 入門）
専門用語なしの excel vba マクロ 入門 2013 2010 2007 対応講義 第1部
eclipse java 入門へ
excel 2016 vba 入門第１部へ
本サイトトップへ