連日偏った(笑)テーマが続きます。
記録の意味もあるので書きと留めます、関心のない方はパスをしてください。 2010/12/22と同じタイトルです。 H氏とは広瀬達雄さんのことで、“広瀬達雄さんとFCAI”というタイトルで今年の06/19に記しています。 ご家族から喪中の挨拶が来ましたが、残された短歌や十進basicのソフトの技術には素晴らしいものがあります。 プログラム言語として今さらbasicという論議はあると思いますが、数学科教科法で機器利用の教科では適切ではないかと思っています。 学生は必ずしもパソコンが皆得意とは限りません。十進basicはスパゲッティプログラムにもなりかねませんが構造化の要素も持っていますし取り付きやすい言語と思います。 基本的なソースはそのまま、多言語への発展にもつながります。 言語教育への手近な導入と数学という教科に必要とされる論理性やアルゴリズムの習熟にも役立ちます。 フリーソフトでusbメモリの中でも動くので、自宅にwinsowsパソコンを持っている生徒にも気軽に使えるのも利点です。また解凍フォルダーの中にマニュアルのpdfファイルがあり打ち出して使うと自学自習ができます。 昨日の機器利用の教科法のなかで、3コマほどの説明の後、課題作りのヒントの時間にしました。 その中で、広瀬さんのことを話し氏の作品群のプログラムと実際の画面の動きを紹介しました。▼ basic.exeの実行画面にコピーして貼り付けると動きます。 ! マウスで線を描く(4) ! 起動して左ボタンでドラッグすると線を描く。 ! 右クリックで入力窓が出るので、1~9を入れると線の太さが変る。 ! 10~19を入れると色を指定できる。 ! 10白,11黒,12青,13緑,14赤,15水色,16黄色,17赤紫,18灰色,19濃い青 ! 消しゴムは背景と同色(通常は白)を塗ればよい。 ! 20以上または 0以下を入れると終了する。 SET WINDOW -2,2,-2,2 SET LINE COLOR 1 LET p=1 DO mouse poll x,y,l,r IF l<>0 THEN PLOT LINES:x,y; ELSEIF l=0 THEN PLOT LINES END IF IF r<>0 THEN INPUT PROMPT "10白,11黒,12青,13緑,14赤,15水色,16黄色,17赤紫,18灰色,19濃い青":p LET p=INT(p) IF (p=<0 OR p>20) THEN EXIT DO IF (p<20 AND p>=10) THEN SET LINE COLOR (p - 10) ELSEIF (p>0 AND p<10) THEN SET LINE width p END IF END IF LOOP END 学生が早速楽しんでいました。▼ ! 以前、サイクロイドとトロコイドの描画で、CLEARを使った !ために「ちらつき」が出ましたが、Sampleプログラムで次の !コマンドがあるのを見て、それを使用してちらつきをなくし !ました。 !--------------------------------------------------------- !「ヘルプ」の「グラフィックス」の内に独自の拡張(特殊処理)として、 ! !SET DRAW MODE HIDDEN ! 内部にあるビットマップメモリにのみ描画するモードに移行する。 ! 描画に伴うばたつきを抑えたいとき用いる。 ! !SET DRAW MODE EXPLICIT ! 内部ビットマップを画面に反映させ,画面とビットマップメモリの双方に描画するモードに戻る(標準の状態)。 !ーーーーーーーーー十進BASIC--------- PRINT "サイクロイドとトロコイドと円" SET WINDOW -30,30,-30,30 LET a=2 !円の半径 LET d=3 !円周から円外の点までの長さ FOR i=-4*PI TO 4*PI STEP 0.1 SET DRAW mode hidden ! ちらつき防止の特殊処理(1) CLEAR SET LINE width 2 DRAW axes0 FOR t=-4*PI TO i STEP 0.1 SET LINE COLOR 4 LET x=a*(t-SIN(t)) LET y=a*(1-COS(t)) PLOT LINES: x,y; NEXT t PLOT LINES FOR t1=-4*PI TO i STEP 0.1 SET LINE COLOR 1 LET x1=a*(t1-SIN(t1))-d*SIN(t1) LET y1=a*(1-COS(t1))-d*COS(t1) PLOT LINES: x1,y1; NEXT t1 PLOT LINES DRAW circle WITH SCALE(a)*SHIFT(a*t,a) SET LINE width 1 PLOT LINES:a*t,a;x1,y1 SET DRAW mode explicit ! ちらつき防止の特殊処理(2) FOR j=1 TO 10000 NEXT j NEXT i PLOT TEXT ,AT -28,24 : "サイクロイド(赤)とトロコイド(黒)" END 実行すると次のような画面になります。▼
by okadatoshi
| 2013-12-20 15:41
| 情報/数学/授業
|
Comments(2)
>学生は必ずしもパソコンが皆得意とは限りません。
はい、先生も 必ずしもパソコンが皆得意とは限りません。(笑) 教師をしている知人は 私よりパソコンが素人で、自分の使う音響装置にも苦労しているようです。 教員を目指す人は担当する教科によって それなりの情報機器に対する実践知識を習得しておくことは必要なのでしょうね。
0
Commented
by
okadatoshi at 2013-12-21 11:49
shinmamaさま
最低限の機器を扱う知識をどのように浸透させるのか難しい所です。 事務室の職員は給与計算の電算化などが決まれば 否応なしに会計処理をマスターします。パソコン操作ができなければ 仕事がこなせないからです。 その点教師は、年齢差もあり、おおくの雑用に追われ 研修制度も整備されない中で、ハード面のインフラ(各普通教室に LANの回線があり、モニターも設置され、一人一台ノードが貸与) が整備されてますが、一向に定着しません。
|
カテゴリ
全体 散策/登山 機器/ソフト 情報/数学/授業 メディア デジの目 セピア色/若い時代 絵ごころ 読書 グルメ 人びと 講演会記録 日々の暮らし 孫の時間 電鉄ウォーク 文具・小物 乗り物 海外旅行▼ Vietnam Cambodia カナダ 中欧5か国 ネパール 中国 トルコ スペイン NZ イタリア 未分類 検索
最新のコメント
最新のトラックバック
フォロー中のブログ
小肥りじいさんが見た風景 神戸トピックス 飛行機が好きなおばちゃんの日記 年金だけでも楽しく暮らし... コウベライフ 風を切る 鉄人の鉄人は鍛鉄の鉄人・... REIKO GOGO日記 氷ノ山登山ガイド則さんの日記 cool witch 聚 糧 ケ・セラ・セラ そらいろのパレット 風と雲 チャーリーのブログ 獺祭亭日乗 もう見えない父と、母と我... 書架だより リンク先
タグ
スケッチ
ピグマペン
垂水健康公園
学園都市駅
明石海峡大橋
須磨パティオ
総合運動公園
絵葉書
名谷図書館
名谷駅
転法輪寺
須磨離宮公園
しあわせの村
ほっともっとフィールド神戸
コスモスの丘
総合運動公園駅
須磨パテイオ
関西スーパー名谷店
山陽バス
明石海峡
岡山城
菜の花
ポンポン山
高塚山
神戸森林植物園
妙法寺駅
ワイン城
外大図書館
三木山森林公園
集中講義
以前の記事
2024年 03月 2024年 02月 2024年 01月 2023年 12月 2023年 11月 2023年 10月 2023年 09月 2023年 08月 2023年 07月 2023年 06月 2023年 05月 2023年 04月 2023年 03月 2023年 02月 2023年 01月 2022年 12月 2022年 11月 2022年 10月 2022年 09月 2022年 08月 2022年 07月 2022年 06月 2022年 05月 2022年 04月 2022年 03月 2022年 02月 2022年 01月 2021年 12月 2021年 11月 2021年 10月 2021年 09月 2021年 08月 2021年 07月 2021年 06月 2021年 05月 2021年 04月 2021年 03月 2021年 02月 2021年 01月 2020年 12月 2020年 11月 2020年 10月 2020年 09月 2020年 08月 2020年 07月 2020年 06月 2020年 05月 2020年 04月 2020年 03月 2020年 02月 2020年 01月 2019年 12月 2019年 11月 2019年 10月 2019年 09月 2019年 08月 2019年 07月 2019年 06月 2019年 05月 2019年 04月 2019年 03月 2019年 02月 2019年 01月 2018年 12月 2018年 11月 2018年 10月 2018年 09月 2018年 08月 2018年 07月 2018年 06月 2018年 05月 2018年 04月 2018年 03月 2018年 02月 2018年 01月 2017年 12月 2017年 11月 2017年 10月 2017年 09月 2017年 08月 2017年 07月 2017年 06月 2017年 05月 2017年 04月 2017年 03月 2017年 02月 2017年 01月 2016年 12月 2016年 11月 2016年 10月 2016年 09月 2016年 08月 2016年 07月 2016年 06月 2016年 05月 2016年 04月 2016年 03月 2016年 02月 2016年 01月 2015年 12月 2015年 11月 2015年 10月 2015年 09月 2015年 08月 2015年 07月 2015年 06月 2015年 05月 2015年 04月 2015年 03月 2015年 02月 2015年 01月 2014年 12月 2014年 11月 2014年 10月 2014年 09月 2014年 08月 2014年 07月 2014年 06月 2014年 05月 2014年 04月 2014年 03月 2014年 02月 2014年 01月 2013年 12月 2013年 11月 2013年 10月 2013年 09月 2013年 08月 2013年 07月 2013年 06月 2013年 05月 2013年 04月 2013年 03月 2013年 02月 2013年 01月 2012年 12月 2012年 11月 2012年 10月 2012年 09月 2012年 08月 2012年 07月 2012年 06月 2012年 05月 2012年 04月 2012年 03月 2012年 02月 2012年 01月 2011年 12月 2011年 11月 2011年 10月 2011年 09月 2011年 08月 2011年 07月 2011年 06月 2011年 05月 2011年 04月 2011年 03月 2011年 02月 2011年 01月 2010年 12月 2010年 11月 2010年 10月 2010年 09月 2010年 08月 2010年 07月 2010年 06月 2010年 05月 2010年 04月 2010年 03月 2010年 02月 2010年 01月 2009年 12月 2009年 11月 2009年 10月 2009年 09月 2009年 08月 2009年 07月 2009年 06月 2009年 05月 2009年 04月 2009年 03月 2009年 02月 2009年 01月 2008年 12月 2008年 11月 2008年 10月 2008年 09月 2008年 08月 2008年 07月 2008年 06月 2008年 05月 2008年 04月 2008年 03月 2008年 02月 2008年 01月 2007年 12月 2007年 11月 2007年 10月 2007年 09月 2007年 08月 2007年 07月 2007年 04月 2007年 03月 2007年 02月 2007年 01月 2006年 12月 2006年 11月 2006年 10月 2006年 09月 2006年 08月 2006年 07月 2006年 06月 2006年 05月 2006年 04月 2006年 03月 2006年 02月 2006年 01月 2005年 12月 2005年 11月 2005年 10月 2005年 09月 2005年 08月 2005年 07月 2005年 06月 2005年 05月 2005年 04月 2005年 03月 2005年 02月 2005年 01月 2004年 12月 2004年 11月 2004年 10月 記事ランキング
ブログジャンル
画像一覧
|
ファン申請 |
||