20 lines
138 B
ObjectPascal
20 lines
138 B
ObjectPascal
|
|
unit unit4;
|
|
|
|
interface
|
|
|
|
procedure u4proc;
|
|
|
|
implementation
|
|
|
|
uses unit5;
|
|
|
|
procedure u4proc;
|
|
begin
|
|
u5proc;
|
|
writeln('u4proc');
|
|
end;
|
|
|
|
|
|
end.
|