18 lines
158 B
ObjectPascal
18 lines
158 B
ObjectPascal
unit HalfS;
|
|
|
|
procedure ToString(a : boolean);
|
|
begin
|
|
|
|
end;
|
|
|
|
procedure Test(a : array of real);
|
|
begin
|
|
|
|
end;
|
|
|
|
procedure Line(s : string);
|
|
begin
|
|
|
|
end;
|
|
|
|
end. |