行番号 | ||
A=5 | 5をAに格納 | |
B=-6 | -6をBに格納 | |
C=A+B | Bの内容をAの内容に加算して結果をCに格納 | |
IF C<0 THEN GOTO 70 | C<0ならば70行へジャンプ | |
IF C=0 THEN GOTO 70 | C=0ならば80行へジャンプ | |
PRINT "+":GOTO 90 | +を出力した後に90行へジャンプ | |
PRONT "-":GOTO 90 | -を出力した後に90行へジャンプ | |
PRINT "0":GOTO 90 | 0を出力する | |
END | おわり | |
(PR-5) |
10 | A=2 |
20 | B=-1 |
30 | C=A*B |
40 | IF C( イ )0 THEN GOTO ( ロ ) |
50 | PRINT "+":GOTO 70 |
60 | PRINT "-" |
70 | END |
(PR5-2) |
10 | A=2 | 2をAに格納 |
20 | B=-1 | -1をBに格納 |
30 | C=A*B | Bの内容とAの内容の積をCに格納 |
40 | IF C<0 THEN GOTO 60 | Cが負ならば60行にジャンプ |
50 | PRINT "+":GOTO 70 | +を表示して70行にジャンプ |
60 | PRINT "-" | -を表示する |
70 | END | おわり |
(PR-6) |
10 | LW=60 | |
20 | RW=100*100/60/td> | |
30 | IF LW
| |
40 | IF LW=RW THEN GOTO ( ロ )/td> | |
50 | PRINT "R":GOTO ( ハ )/td> | |
60 | PRINT "L":GOTO ( ニ )/td> | |
70 | PRINT "L=R"/td> | |
80 | END |
10 | 60をLWに格納する |
20 | RWにI*I*Rを計算した数値を格納する |
30 | LW>RWならば「L」を表示するために、60行にジャンプする |
40 | LW=RWならば、70行にジャンプする |
50 | LW>RW及びLW=RWでもないLW |
60 | Lを表示して80行へジャンプする |
70 | L=Rを表示して80行へ移る |
10 | LW=60 |
20 | RW=100*100/60 |
30 | IF LW |
40 | IF LW=RW THEN GOTO 70 |
50 | PRINT "R":GOTO 80 |
60 | PRINT "L":GOTO 80 |
70 | PRINT "L=R" |
80 | END |
(PR-7) |