Обобщенные подпрограммы
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Обобщенные подпрограммы писать легко. При вызове обобщенной подпрограммы происходит выведение типа.
procedure Println<T>(a: array of T);
begin
for var i:=0 to a.Length - 1 do
write(a[i],' ');
writeln;
end;
var
a: array of integer := (1,3,5,7,9);
ss: array of string := ('Иванов','Петров','Сидоров','Попов');
begin
Println(a);
Println(ss);
end.
