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