11 lines
237 B
ObjectPascal
11 lines
237 B
ObjectPascal
uses MyUnit; // подключили модуль
|
|
|
|
const Sz = 10;
|
|
|
|
begin
|
|
var a: IntArr := FillArr(Sz);
|
|
Println('Содержимое массива:');
|
|
a.Println;
|
|
Println('Минимальный элемент:',Min(a));
|
|
end.
|