3年前から「理研の重粒子線照射アサガオ突然変異project」に勝手に参加している。
珍しい花の形が出たかもしれない。
自家受粉している。だから2年目から突然変異遺伝子のホモ接合個体が期待できる。しかし昨年一つあったような気も「気付くのが遅れ」虫害と断定していた。それに似ているような。
ちょっと「虫が食べた」ようにも見える。でも、食害にしては均一で糞もない。
ノーマルは、以下の形。
----
学名, Ipomoea nil の理研で(2つ)使っているうち「古来から伝わる青いアサガオ」の方で小ぶりの花が咲く系統。
--
大きさの尺度を入れて再度点検；；
期待して自家受粉をしっかりした。
----
双六は。；；
1101_;;;
___
start = 0
goal = 20
koma = 0
count = 0
koma < goalの間繰り返す：
saikoro = random(5) + 1
koma = koma + saikoro
count = count + 1
もしkoma >= goalならば：
表示する("出目：",saikoro,"ゴールしました！",koma)
そうでなければ：
表示する("出目：",saikoro,"コマの位置：",koma)
表示する("ゴールまでの回数：",count)
----
を実行する。
random なので毎回違うけれど、例えば・・・；；
---
出目： 6 コマの位置： 6
出目： 2 コマの位置： 8
出目： 4 コマの位置： 12
出目： 6 コマの位置： 18
出目： 4 ゴールしました！ 22
ゴールまでの回数： 5
---
となった。
「数さがし」game なども可能か。
1102_;;;
---
find = "札"
satu_kazu = 0
wa = 0
satu = ["◯","△","札","◯","札","札","◯","札","△"]
money = [0,8,20,0,30,20,2,40,3]
gyoを1からlength(satu)まで1ずつ増やしながら繰り返す：
もしsatu[gyo-1] == findならば：
wa = wa + money[gyo-1]
satu_kazu = satu_kazu + 1
表示する("札の数は",satu_kazu,"個で合計金額は"、wa,"円です。")
-----
実行結果は；；
----
札の数は 4 個で合計金額は 110 円です。
---
となる。
-------
あんまり実用的でないけれども。
点数を配列化していじれる。
1103_;;;
--
kamoku = ["英語","国語","数学","情報I"]
point = [75, 80, 95, 100]
saikoutenn = -1
basyo = 0
iを0からlength(kamoku) - 1まで1ずつ増やしながら繰り返す：
もしpoint[i] > saikoutennならば：
saikoutenn = point[i]
basyo = i
表示する("最高点は",kamoku[basyo],"の",saikoutenn,"点です。")
----
を実行；；；
-----
最高点は 情報I の 100 点です。
---
となった。
------
