Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2016/05/21 18:32:27

MixJuice GET URL : kidspod.club/mj/69

ネガイマシテーハ

ichigojamがそろばんの練習問題を出してくれます
スペースで合計表示、その他のキーで足し算か引き算を続けます。

SOURCE CODE

1 'ネカ゛イマシテーハ
10 C=0:B=1:?:?"ネカ゛イマシテーハ":?
30 A=RND(20)+1
40 IFB>0?A;"エンナーリ":C=C+A
50 IFB<0ANDC<A B=1:GOTO40
55 IFB<0?"ヒキマシテーハ";A;"エンナーリ":C=C-A
60 K=INKEY()
70 IF K=0 GOTO60
80 IFK=32?"テ゛ハ":?C:END
90 ?:D=RND(2)*2-1:IFD>0ANDB<0 ?"クワエテ"
100 LETB,D:GOTO30

COMMENT