21 lines
145 B
ObjectPascal
21 lines
145 B
ObjectPascal
|
|
unit unit2;
|
|
|
|
interface
|
|
|
|
uses unit1;
|
|
|
|
procedure u2proc;
|
|
|
|
implementation
|
|
|
|
procedure u2proc;
|
|
begin
|
|
writeln('u2proc');
|
|
u1proc;
|
|
end;
|
|
|
|
begin
|
|
|
|
end.
|