Модуль в Delphi

[Kati]

Написать модуль, содержащий функцию сортировки массива размерностью [1; 10]. Вызываемая функция должна содержать 2 параметра: число, ограничивающее размер массива, массив целых чисел. Написать программу, демонстрирующую использование функции при подключении написанного модуля.

Я написала модуль:

Unit sort_my;
interface
procedure SortMin (var Arr : array of Integer; n : Integer);
implementation
procedure SortMin (var Arr : array of Integer; n : Integer);
var
i, j : Integer;
Min, Pos, Temp : Integer;
begin
for i := 0 to n - 1 do begin
Min := Arr [i];
Pos := i;
for j := i + 1 to n do
if Arr [j] < Min then begin
Min := Arr [j];
Pos := j;
end;
Temp := Arr [i];
Arr [i] := Arr [Pos];
Arr [Pos] := Temp;
end;
end.

Можно ли в модуле писать не функцию, а процедуру?
И как написать программу демонстрирующую использование модуля в Delphi?

[Mad_Cat]

Можно ли в модуле писать не функцию, а процедуру?

можно

И как написать программу демонстрирующую использование модуля в Delphi?

напишите программу в uses подключите свой модуль и вызовите свою процедуру из модуля
с параметрами

число, ограничивающее размер массива, массив целых чисел

[Kati]

Попробовала!
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, sort_my;

type
TForm1 = class(TForm)
Label1: TLabel;
StringGrid1: TStringGrid;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses sort_my;

{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
n:array[1..10] of integer;
i,j:integer;
begin
for i:=1 to 10 do
begin
n[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
sort_my(n[i]);
StringGrid1.Cells[i-1,0]:=IntToStr(n[i]);
end;
end.

Но получается куча ошибок!

[Mad_Cat]

A зачем 2 раза то его подключать?

[Kati]

Все равно ругается на обращение к процедуре!

[RUSt88]

у вас типы не совпадают, в объявлении один тип, при вызове передаете другой

sort_my(n[i]);

что это вообще такое???