2004/A2/光を追いかけるロボット(必須)
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2004/A2/練習問題]]
>task main () {
> SetSensor(SENSOR_1, SENSOR_LIGHT);
>OnRev(OUT_A);
>OnFwd(OUT_C);
>wait(1500);
while(true)
>{
> if(SENSOR_1 > 40)
>{
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
}
else
>{
>Off(OUT_A+OUT_C);
>OnRev(OUT_A);
>OnFwd(OUT_C);
>}
>}
>}
終了行:
[[2004/A2/練習問題]]
>task main () {
> SetSensor(SENSOR_1, SENSOR_LIGHT);
>OnRev(OUT_A);
>OnFwd(OUT_C);
>wait(1500);
while(true)
>{
> if(SENSOR_1 > 40)
>{
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
}
else
>{
>Off(OUT_A+OUT_C);
>OnRev(OUT_A);
>OnFwd(OUT_C);
>}
>}
>}
ページ名: