札幌で個別指導塾開業を目指す三十代男性の日記
 現在、札幌在住の30代の私(40代突入しました)が、個別指導塾開業を目指す過程をブログにしてみようと思いました(開業しました)。教育関係のことなどもいろいろと書き込みたいと思います。 リンクフリー
3行プログラム 約数全検索
 昨日は、生徒用に考えたトランプを使った九九のゲームをやりました。計4人と対戦してみましたが、じゅうぶん遊べそうです。細かいルールはやはり生徒の九九の習得具合によって変えなければならないみたいです。普通は負けのところを大目にみるとかですね。そのうち、ここで紹介しようと思っています。

 九九のゲームを考えていて、ふと中学受験の算数のことを思い出したので、ちょっと役に立つかもしれないプログラムをつくってみました。言語はBASICです。BASICがなくてもフリーソフトでダウンロードできるのでプログラムに興味のある人は手にいれてみるのもいいと思います。算数好きの子も結構遊べると思います。

 つくったプログラムは、約数全検索です。長いと打ち込みが大変なので、とりあえず3行だけです。

 使い方
 約数を知りたい数字を入れてプログラムを起動する。これだけです。

 結果
 入れた数字の約数がすべて表示されます。たとえば、今年の数字2012を入れると
 1 2 4 503 1006 2012
 の6つが表示されます。

 それでは、プログラムです。
 
 10 FOR I=1 TO A
 20 IF A MOD I = 0 THEN PRINT I
 30 NEXT I

 これだけです。

 10行と20行のAのところに数字を入れてプログラムを実行させると約数が出てきます。

 3行以上になってしまいますが、いちいちプログラムをいじるのは面倒という人向けはこちら

  5 INPUT A 
 10 FOR I=1 TO A
 20 IF A MOD I = 0 THEN PRINT I
 30 NEXT I

 実行すると?で数字を聞いてくるので、数字を入れてENTERキーを押します。

 実行するたびに前に検索した約数を画面から全部消したい人は以下を追加

  3 CLS

 約数をたくさん表示したいので、たてではなく横に並べたいという人は、20行のPRINT IのIの後ろに;を入れてください。こうなります。

 20 IF A MOD I = 0 THEN PRINT I;

 追加分を全部表示するとこうなります。

  3 CLS
  5 INPUT A 
 10 FOR I=1 TO A
 20 IF A MOD I = 0 THEN PRINT I;
 30 NEXT I

 ここに書いてあるプログラムをコピーしてもいいですが、全角半角の違いなどもあるのでうまくいく保障はあません。;と;とか…… 少ないので自分で打ち込んでもそんな時間はかからないと思います。
 ダウンロードしたBASICのソフトとの相性でうまくいかない場合もあると思いますが、始めに紹介した3行プログラムのみなら、まずどのBASICでも大丈夫だと思います。
 あと、どのくらい大きな数まで扱えるかも、BASICによって違ってくると思います。

 約数をいっぱい見られる数字

 810000
 24300000
 729000000 など

 約数の数の計算方法もあるので、興味のある人は調べてみてはどうでしょうか


 ちなみに6を打つと約数が1 2 3 6と出ます。
 6以外の約数を全部足すと1+2+3=6で6になります。このような数を完全数と言います。

 6の次の完全数は28です。
 1+2+4+7+14=28

 そして、塾のある住所が実は3桁の完全数になっています。本当に偶然なのですが、せっかく数学的に面白い住所にあるのだから算数・数学に関して特色のある塾にしたいなとたまに思ったりします。


 本当はゲームっぽいものとかもやりたいのですが、誰でも簡単にまねできて少ない行数となるとこんなプログラムのようなものしか思いつきません。似たようなプログラムで使えそうなものがあったら、またここで紹介したいと思います。
  
関連記事


スマホ汚染

新宿で女子大生が大量に倒れる

死を生み出している産業

札幌麻生個別指導のホームページへ
ブログタイトルをクリックすると新しい記事から順に読めます

テーマ: - ジャンル:学校・教育

この記事に対するコメント

この記事に対するコメントの投稿














管理者にだけ表示を許可する


この記事に対するトラックバック
トラックバックURL
http://sapporoedu.blog74.fc2.com/tb.php/481-7b3c08f8
この記事にトラックバックする(FC2ブログユーザー)

にほんブログ村 教育ブログへ
リンク

このブログをリンクに追加する



最近の記事



カテゴリー



FC2カウンター



アクセスランキング

[ジャンルランキング]
学校・教育
84位
アクセスランキングを見る>>

[サブジャンルランキング]
塾・予備校
6位
アクセスランキングを見る>>



プロフィール

sapporoedu

Author:sapporoedu



最近のコメント



最近のトラックバック



ブログランキング

FC2ブログランキング



月別アーカイブ



ブログ内検索



RSSフィード



ブロとも申請フォーム

この人とブロともになる