pascalabcnet/InstallerSamples/!Tutorial/09_Units/UnitStructure/MainProgram.pas

11 lines
237 B
ObjectPascal
Raw Normal View History

2025-11-05 12:17:39 +03:00
uses MyUnit; // подключили модуль
2015-05-14 22:35:07 +03:00
const Sz = 10;
begin
2025-11-05 12:17:39 +03:00
var a: IntArr := FillArr(Sz);
Println('Содержимое массива:');
a.Println;
Println('Минимальный элемент:',Min(a));
2015-05-14 22:35:07 +03:00
end.