Help us understand the problem. What is going on with this article?

小さなお友だちの為の MacOsXでBASIC #14 極方程式からの正葉線 r = sin3θ

More than 5 years have passed since last update.

記述する動機

私、とある専門学校でPGを教えています。はや8年。いまだにSEもやってます。
学生さんたちに読んでもらうために書いているのですが、悩めるプログラマ、悩めるSE、悩める教育関係者にも何かのヒントにはなると思い、あえて公開していきたいと思います。全て実例です。個人名は秘密!!

BASIC

名前は「beginner's all-purpose symbolic instruction code」(「初心者向け汎用記号命令コード」を意味する)の頭字語である。

18歳以上はLinux,Macでc,Javaやりましょう。GCCを使えるようになりましょう。
14歳から18歳はOS問わず、IDEを使って、言語は何でもいい。
10歳から14歳は lua or BASIC おまけでscratch
10歳未満はコンピュータなんかやらんで良し。言語能力、身体能力を鍛えましょう。

前提

http://qiita.com/ggggnonaka/items/8cf3b069594e684f9c0e
を御覧ください。

極方程式を媒介変数形に変形

極方程式でr=f(θ)の場合
媒介変数表示では
x=f(θ)*cos(θ)
y=f(θ)*sin(θ)
r=sin(3θ)の場合、正葉戦となります。
プログラムとしては、以下のコード

14.BAS

14.BAS
10 DEF f(t)=SIN(3*t)
20 SET WINDOW -1,1,-1,1
30 DRAW grid
40 FOR t=0 TO 2*PI STEP PI/360
50    PLOT LINES: f(t)*COS(t), f(t)*SIN(t);
60 NEXT t
70 END

実行結果

おお!きれいに描画できてます。
スクリーンショット 2015-02-13 12.26.38.png

ggggnonaka
業務系SEなのに、ゲームプログラム、Webを教えてます。そろそろ本業だけにしとくかなぁ。僕はもう疲れたよ。教育なんてさ...
Why not register and get more from Qiita?
  1. We will deliver articles that match you
    By following users and tags, you can catch up information on technical fields that you are interested in as a whole
  2. you can read useful information later efficiently
    By "stocking" the articles you like, you can search right away