[解決済み】10行以下の簡単なコードでできる最もクールなことは何ですか？初心者を鼓舞するのに役立つ [終了しました］

質問

数行のシンプルなコードでできるクールなことを探しています。 きっとあなたは Haskellで15行でマンデルブロー集合 が、難しいですね。

私の目標は、学生にプログラミングはクールだと思わせることです。 .

私たち 知る プログラミングは、想像したものを何でも作ることができる、究極のクリエイティブアウトレットだからかっこいいのです。 私は、初心者を刺激して、できるだけ多くの初歩的な学習を乗り越えさせたいと考えています。

さて、私の理由は利己的なものです。 私が教えているのは コンピューティング入門 このコースは、工学とビジネスを専攻する60人の新入生を対象にしたものです。 彼らは、恵まれない高校出身の学生たちです。 私の過去の経験では、このグループはだいたい次のように分かれます。 ロックスター 一生懸命な人、そして 種類 を手に入れ、一生懸命に努力する少数の人たちと やっと そして、どうでもいいという人。 私は、これらのグループのうち、できるだけ多くの人に、できるだけ効果的に伝えたいのです。ここでは、コンピュータープログラムを使ってどのように教えるか、その一例をご紹介します。

私が探しているものの一例です。 1行のVBSスクリプトを作成します。 コンピュータがあなたと話すために。

CreateObject("sapi.spvoice").Speak InputBox("Enter your text","Talk it")

これを使って、順序を示すことができます。 操作の コードを見せて と説明します。 この行は、いろいろなことが起こっていますね。 しかし、コンピュータはそれを理解することができます。 なぜなら、ルールを知っているからです。 そして、私は というようなものを見せます。

4(5*5) / 10 + 9(.25 + .75)

そして、最初に必要なのは は(5*5)です。 それから 4. そして、これでオブジェクトを作りました。 10で割るというのは スピークする前に、スピークすることはできません。 オブジェクトを作成する前に、割り算をすることはできません。 は100になります。 そして反対側では まず、InputBoxを作成し、いくつかの を表示するように指示しています。 入力ボックスでエンターキーを押すと を評価するか、またはquot;return"私が何をしたかを返します。 を入力します。 (ヒント: 'ooooo'と入力すると だから、私がSpeakと言うと、Speakの文字が表示されます。 右側がSpeakするものです。 そして私は InputBoxから取得します。

そのため、1つの画面で複数のことを行う場合 のような行になります。

x = 14 + y;

順番を意識する必要があります。 ものです。 まず、14とyを足します。 その結果（評価されたもの）を を返す)をxに入れる。

それが私の目標です。このようなクールな例をたくさん用意して、クラスで楽しみながら実演して教えるのです。 この例をルームメイトに試してみたところ、これを最初の授業に使うことはないかもしれませんが、彼女はこれを気に入ってくれて、何かを学んでくれました。

いくつかのクールな 美しいグラフや図形を作成する Mathematica プログラム というのは良いアイデアだと思うので、そういうのを調べてみようと思っています。 以下はその一部です。 複雑なアクションスクリプトの例 が、それはちょっと高度すぎて、フラッシュは教えられない。 他にどんなアイディアがありますか？

解決方法は？

Microsoft Agentのキャラクターを操作する簡単なVBスクリプトで、子供たちから大きな反響がありました。MSエージェントをよく知らない人のために説明すると、それはCOMインターフェイスを介して操作できる一連の画面上のアニメーションキャラクターである。このコードとキャラクターは、次のサイトからダウンロードできます。 マイクロソフトエージェント のダウンロードページです。

次の数行を実行すると、マーリンのキャラクターが画面に現れ、飛び回り、画面をノックして注意を引き、挨拶するようになります。

agentName = "Merlin"
agentPath = "c:\windows\msagent\chars\" & agentName & ".acs"
Set agent = CreateObject("Agent.Control.2")

agent.Connected = TRUE
agent.Characters.Load agentName, agentPath
Set character = agent.Characters.Character(agentName)

character.Show

character.MoveTo 500, 400
character.Play "GetAttention"
character.Speak "Hello, how are you?"
Wscript.Sleep 15000
character.Stop
character.Play "Hide"

このほかにも、使えるコマンドは非常に多い。チェック http://www.microsoft.com/technet/scriptcenter/funzone/agent.mspx をご覧ください。

edit 2011-09-02 最近、Microsoft AgentがWindows 7にネイティブにインストールされていないことを発見しました。しかし、別のダウンロードとして提供されています こちら . 私はこれをテストしていないので、動作するかどうか検証できません。