1 {#
2
3 FOO
4 1 2 3 4
5
6 ROI
7 1000 1500
8 1800 1900
9 2000 2200
10
11 BAR
12 2 3 5
13 2 4 6
14
15 &}
16 program equrs;
17 uses mtx09;
18 var a:mtx;
19 begin
20 tra;
21 equ(a,'1,2');
22 equ(a,'1 2 3');
23 equ(a,'1 2 3; 4 5 6; 7 8 9;');
24 equ(a,'');
25 equ(a,'./equrs.pas,ROI')
26 end.
27 {
28 # equ [1,2]
29 1 2
30
31 # equ [1,3]
32 1 2 3
33
34 # equ [3,3]
35 1 2 3
36 4 5 6
37 7 8 9
38
39 # equ [0,0]
40
41 # mrd [3,2]
42 ROI
43 1000 1500
44 1800 1900
45 2000 2200
46
47 # equ:./equrs.pas,ROI [3,2]
48 ROI
49 1000 1500
50 1800 1900
51 2000 2200
52
53 }