9 lines
161 B
Text
9 lines
161 B
Text
include c:\cxpl\codes;
|
|
int Size;
|
|
int A, B;
|
|
real X, Y;
|
|
[Size:= addr B - addr A;
|
|
IntOut(0, Size); CrLf(0);
|
|
Size:= addr Y - addr X;
|
|
IntOut(0, Size); CrLf(0);
|
|
]
|