blob: c08b6589ad1faab42390654f13cea2a2d7dd6241 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
DECLARE Hi : INTEGER
DECLARE Lo : INTEGER
INPUT Hi
INPUT Lo
OUTPUT Hi
OUTPUT Lo
OUTPUT Hi - 1
OUTPUT Lo + 1
OUTPUT Hi + Lo
OUTPUT Lo < 0, ":", Hi > 0, ":", Lo < Hi
OUTPUT Hi DIV 1, ":", Lo DIV 1, ":", Lo MOD 1
|