Нет перегруженной подпрограммы с такими типами параметров - PascalABC.NET (24408)

Формулировка задачи:

Ругается на 13-ую строчку. Программа:
var k,a : array[1..n] of double;
///Сортирует массив k в порядке невозростания
procedure Sort(k : array of double);
begin
for var i:=1 to n-1 do
begin
for var j:=1 to n-i do
  if k[j]<k[j+1] then swap(k[j],k[j+1]);
end;
end;
Begin
...
Sort(k);
foreach l : double in k do write(l,' ');
end.

Код к задаче: «Нет перегруженной подпрограммы с такими типами параметров - PascalABC.NET (24408)»

textual
type tarr = array[1..n] of double;
var k,a : tarr;
///Сортирует массив k в порядке невозростания
procedure Sort(var k : tarr);
begin
for var i:=1 to n-1 do
begin
for var j:=1 to n-i do
  if k[j]<k[j+1] then swap(k[j],k[j+1]);
end;
end;
Begin
/// ...
Sort(k);
foreach l : double in k do write(l,' ');
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

8   голосов, оценка 3.875 из 5


СДЕЛАЙТЕ РЕПОСТ