+ Added line to show that type of return value is same as argument

This commit is contained in:
michael 2000-05-18 16:23:50 +00:00
parent edd14ed266
commit 99789617ae

View File

@ -34,5 +34,7 @@ begin
For I:=Low(C) to High(C) do
C[i]:=I;
Writeln ('Average :',Average(c));
Write ('Type of return value is always same as type of argument:');
Writeln(high(high(word)));
end.