CHANGEDIR
WRITELN
PROGRAM
READLN
WRITE
BEGIN
LOAD
SAVE
FILE
READ
THEN
NEW
VAR
END
IF
O
Q
N
L
B
E
G
I
N
E
Q
T
N
H
I
E
O
I
U
X
M
W
T
X
C
G
K
N
E
P
X
H
C
J
A
T
R
Q
Y
G
W
O
Z
L
Q
O
A
O
G
O
H
I
E
M
Z
R
J
U
V
U
P
I
F
I
I
E
T
O
H
G
I
E
U
F
D
X
C
A
I
O
N
E
R
X
X
T
U
O
R
A
M
B
O
O
Q
R
L
T
A
V
E
P
A
A
K
Q
U
H
E
O
I
N
E
A
Y
I
O
A
V
V
F
I
L
E
I
D
L
A
E
B
H
J
O
L
A
R
C
P
S
Z
E
D
O
N
E
W
L
D
E
O
F
U
D
A
I
G
A
Q
D
K
E
P
V
G
N
J
O
A
V
S
N
E
R
A
I
N
A
K
T
G
U
N
O
E
F
A
R
Q
E
V
D
O
I
W
P
X
U
L
Y
G
H
T
P
R
O
G
R
A
M
H
O
W
O
U
S
C
E
U
I
E
O
R
A
Z
M
