数学検定の5級、準2級の合格を目指している人のために練習アプリを作りました。
しっかり練習して合格することを祈っています。
電卓で素因数分解
最近の関数電卓には素因数を求める関数が入っていますが、fx-5800Pにはありません。他にも最小公倍数や最大公約数の関数もありません。まあ、プログラムができるからいいのかも?
取扱説明書にプログラム例題というこで素因数分解のプログラムが紹介されています。(P117)
早速入力してみました。みごとに素因数分解してくれます。
例えば18144を素因数分解しようします。
18144=25×34×7なのですが、
EXEキーを押すごとに1つずつ答えが表示されます。
つまり2が5回表示され、3が4回表示7が表示されさらにEXEキーを押すとENDと表示されます。これは実用的ではありません。そこで仕方なく新しくプログラムを作りました。
———————————————–
“N”?→N
Int(√(N))+1→M
2→P:Cls
Lbl 2:0→I
While Frac(N+P)=0:N÷P→N:I+1→I:WhileEnd
If I>0:Then Locate1,1,P
Locate 5,1,I◢
IfEnd
If P>M:THen Locate 1,2,”END”:Stop:IfEnd
If P=2:Then 1→P:IfEnd
P+2→P
Goto 2

しらみつぶし法で求めましょう。
4つを選ぶすべてのパターンを生成してPを求めて奇数だったら表示します。
For 1→A To 3
For A+1→B To 4
For B+1→C To 5
For C+1→D To 6
A×B×C+A×B×D+A×C×D+B×C×D→P
If Frac(P÷2)=0.5:Then P◢
IfEnd
Next:Next:Next:Next:Cls
このプログラムを実行すると61, 107,153が表示されます。
数学検定準2級問題-4

分かりにくい問題です。2倍して10以上になるのは5,6,7,8,9です。5,6,8のパターンが分かっているので、残りの1→・・・・7→1となるパターンと1→・・・・9→1となるパターンを探せばよいことが分かります。
2→S
1→Y
Lbl 1:S×2→S
Int(S÷10^(Int(log(S)))→X
Y×10+X→Y
If X=1:Then 1→Y
IfEnd
If X=7:Then Y×10+1:Stop:IfEnd
Goto 1
X=7のとき1371、X=9のとき12491が求められる。
数学検定準2級過去問題-3

A,B~hを正方形の各辺の長さとすると8個の方程式ができるので8元連立方程式を解けば求められます。しかし、電卓は5元の連立方程式しか解けないので工夫しなければ解けません。
そこで作戦を変更します。fの長さが分かればg,e,d,hの値が分かります。またAの長さが分かればC,Bの値が求められます。
長方形の向かい合う辺の長さは等しいので方程式が2つ作れます。これで2元の連立方程式になります。
長方形の左辺=右辺より
c+B=e+g+h・・・・・・①
上辺=下辺より
c+d+e=B+h・・・・・・②
g=f+1,e=f+2,d=f+3,c=d+A=f+A+3,
B=c+A=f+2A+3,h=f+g=2f+1
これらの式を①、②に代入します。
2f+3A+6 = 4f+4・・・・①’
3f+A+8 =3f+2A+4・・・②’
ここまで解くと電卓を使わなくても簡単に解けるのでちょっとがっかり。
別解 図を見てとりあえずA=4,f=7と仮定する。
するとe=9,d=10,c=14となり長方形の横の長さが33となる。
B=18なのでh=15である。
左辺の長さはc+B=32, 右辺の長さはe+g+h=32となり仮定は正しい。
仮定が違うと左辺≠右辺となる。
数学検定準2級問題-2
A,B,Cを1以上9以下の整数とします。
A+2=B+1=C
を満たし、かつ差ACAC-AcがBBの10倍に等しくなるようなA,B,Cの組が1つだけ存在します。その組を求めなさい。
これもしらみつぶし法で求めましょう。
For 1→A To 7
A+1→B:B+1→C
If A×1010+C×101ーA^(C)=B×110
Then A×100+B×10+C:Stop
IfEnd
Next
実行すると一瞬で答えが456と表示されます。
A=4, B=5, C=6が解答です。
数検準2級の過去問題を関数電卓fx-5800Pを使って解いたものを紹介する。過去問題はこの問題集を参考にした。

過去4年間の問題が掲載されている。数学検定は実用数学技能検定(後援=文部科学省)
1次、2次の試験があり、2次試験には電卓が使える。
関数電卓、グラフ電卓も使える。
準2級の2次試験は電卓を活用すれば簡単に解ける問題が多いので使い方を紹介しようと思う。
準2級2次:数理技能検定 第2回
【7】次の問に答えなさい。
縦の長さ、横の長さ、高さがすべて正の整数値をとる直方体があります。縦、横、高さの和(3辺の長さの和)が19,体積が240のとき、この直方体の表面積を求めなさい。
この問題は答えだけを書いてください。 (整理技能)
この問題をプログラムで解きましょう。プログラムを作ったことがある人は定番の問題だと思うでしょう。すべての正の整数の組み合わせを生成してその中から条件に合うものを選び出すだけです。しらみつぶし法と呼ばれます。
辺の長さをX, Y, Zとしましょう。
FOR 1→X TO 19
FOR 1→Y TO 19
FOR 1→Z TO 19
IF X+Y+Z=19 And X×Y×Z=240
Then 2×(X×Y+Y×Z+Z×Y):Stop:IfEnd
Next:Next:Next
これを実行すれば答えが表示されます。ただ、この電卓は処理速度が遅いのでプログラムを改良して高速化しましょう。
X≦Y≦ZとすればYとZは1から始める必要はありません。
また、各辺の長さは1以上なので19まで調べなくても17までで良いことが分かります。改良したプログラムは次のようになります。
FOR 1→X TO 17
FOR X→Y TO 17
FOR Y→Z TO 17
IF X+Y+Z=19 And X×Y×Z=240
Then 2×(X×Y+Y×Z+Z×Y):Stop:IfEnd
Next:Next:Next
40秒ぐらい待てば答え 236 が表示されます。

簡単なプログラムが作れる電卓が欲しいと思い探していたところCASIOのfx-5800PでAmazonで¥7,382だった。

プログラウができる電卓はあまり無かったし、もうこれから新しい製品が出そうにもないということでこれにした。
Pythonができるものもあったがこれは安かった。
BASICに似た言語だがクセがあり分かりにくい。これからのこの電卓の使い方、プログラムについて紹介しようと思う。
この電卓を持っている人の参考になればと思う。
Windows 10 バージョン21H2のサポートは終了
Windows 10 バージョン22H2のサポートが2025年10月14日
Windows 11 バージョン22H2のサポートは終了
Windows 11 バージョン23H2のサポートは2025年11月11日
Windows 11 バージョン24H2のサポートは2026年10月13日
Windows 10 のパソコンはWindows 11 に無料でアップグレードできるのですが、古いパソコンは対応していません。
新しいパソコンを購入する。
他のOSをインストールする。


Linux(Ubuntu) ChromeOS Flex
iPhoneのupdate
iOS 18.2 にしましょう!

4を4つ使って0~10
問題 4を4つと四則演算を使って0~9をつくりなさい。
図書館で借りた本に掲載されていた問題です。
とりあえず、解いてみました。と言ってもプログラムを作りましたが。
4□4□4□4 の四角に+-×÷のいずれかが入る
0=4÷4×4-4
1=4÷4+4-4
2=4÷4+4÷4
3=?
4=?
5=?
6=?
7=4+4-4÷4
8=4+4+4-4
9=4÷4+4+4
3~6が解けない。解答を見ると括弧を使ってる!
プログラムを作り直す。
3=(4+4+4)÷4
4=(4-4)÷4+4
5=(4×4+4)÷4
6=(4+4)÷4+4
ちなみに10はできません。プログラムではすべてのパターンを検証したのでできないことが分かります。
やはり小町算の方が美しい!