1
{#
2
3
1 2 3
4
4 5 6
5
6
&}
7
program
mrd_rf;
8
uses
mtx09;
9
var
10
m: mtx;
11
f:
text
;
12
begin
13
opn(
'mrd_rf.pas'
,f);
14
mrd(m,f);
15
mwr(m);
16
end
.
17
{
18
1 2 3
19
4 5 6
20
21
}