11 lines
148 B
Text
11 lines
148 B
Text
|
PROC Main()
|
||
|
|
CHAR ARRAY a="abc",b="ABC"
|
||
|
|
BYTE ARRAY c=[1 2 3]
|
||
|
|
BYTE i
|
||
|
|
|
||
|
|
FOR i=0 TO 2
|
||
|
|
DO
|
||
|
|
PrintF("%C%C%B%E",a(i+1),b(i+1),c(i))
|
||
|
|
OD
|
||
|
|
RETURN
|