＃旅人算の問題 # 変数 牛歩く速さは１０#里(毎日) 馬歩く速さは１５#里(毎日) 先行日数は３#日(牛) 倍率は３。# 描画用の倍率 牛歩いた距離は０#里 馬歩いた距離は０#里 # UI作成 「牛は一日に」のラベル作成。牛歩く速さのエディタ作成して牛速エディタに代入。「里歩きます。」のラベル作成。改行作成。牛速エディタの「幅」に「50px」をDOMスタイル設定。 「馬は一日に」のラベル作成。馬歩く速さのエディタ作成して馬速エディタに代入。「里歩きます。」のラベル作成。改行作成。馬速エディタの「幅」に「50px」をDOMスタイル設定。 「牛は馬より」のラベル作成。先行日数のエディタ作成して先行エディタに代入。「日先に行きます。」のラベル作成。改行作成。先行エディタの「幅」に「50px」をDOMスタイル設定。 「馬は何日目で牛に追いつくでしょう？」のラベル作成。改行作成。改行作成。 「スタート！」のボタン作成してスタートボタンに代入。改行作成。 # 牛と馬を作成 カメキャンバスは[400,200]のキャンバス作成。 カメ描画先はカメキャンバス。 カメ画像URLは、「https://n3s.nadesi.com/image.php?f=208.png」# べこ カメ作成して牛に代入。 カメ画像URLは、「https://n3s.nadesi.com/image.php?f=209.png」# 馬コ カメ作成して馬に代入。 牛と馬を並べる。 スタートボタンをクリックした時には、 描画クリア。 # 条件 牛歩く速さは牛速エディタのテキスト取得を数値変換。 馬歩く速さは馬速エディタのテキスト取得を数値変換。 先行日数は先行エディタのテキスト取得を数値変換。 # 確認 もし、牛歩く速さ≧馬歩く速さならば、: 「馬は牛より大きい値を設定してください」と言う。 戻る。 総歩行距離＝(牛歩く速さ*先行日数/(馬歩く速さ-牛歩く速さ)*馬歩く速さ) もし、総歩行距離＞100ならば、カメキャンバスの「幅」に、100+総歩行距離*3をDOM属性設定。 # 位置に付かせる 牛と馬を並べる。 「牛が{先行日数}日先に行きます」と言う。 牛を先行日数だけ先行させる。 # スタート！ 「馬が歩き始めます{改行}何日で追いつくかな？」と言う。 日数は０#日目 馬歩いた距離が牛歩いた距離未満の間: 牛歩く。 馬歩く。 日数＝日数＋１。 0.5秒待つ。 「答え：{日数}日でした☆」と言う。 検算します。 ここまで。 # 関数 ●検算: 牛歩く速さに先行日数を掛けて実に代入。 馬歩く速さから牛歩く速さを引いて法に代入。 答えは法で実を割ります。 「牛の{牛歩く速さ}里に{先行日数}日を掛けると{実}里となります。 馬の{馬歩く速さ}里から牛の{牛歩く速さ}里を引くと{法}里となります。 {法}里で{実}里を割れば{答え}です。 {答えを切り上げ}日目で追いつくことになります。」と言う。 ●(牛と馬を)並べる: ２回: 牛か馬は回数-1。 牛か馬にカメ操作対象設定。 ９０にカメ角度設定。 [５０,５０+牛馬*８０]へカメ起点移動。 1秒待つ。 ●牛歩く: 牛にカメ操作対象設定。 牛歩く速さ＊倍率だけカメ進む。 牛歩いた距離＝牛歩いた距離＋牛歩く速さ。 ●馬歩く: 馬にカメ操作対象設定。 馬歩く速さ＊倍率だけカメ進む。 馬歩いた距離＝馬歩いた距離＋馬歩く速さ。 ●(牛を先行日数だけ)先行させる: 先行日数回: 牛歩く。 0.5秒待つ。 # 数値が全角で入力されてもＯＫにする ●(Aを)数値変換: Aを英数記号半角変換してそれを実数変換。