Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.08;
Скачать: CL | DM;

Вниз

Поменять длину массива   Найти похожие ветки 

 
ec_stasis ©   (2006-09-17 21:00) [0]


function inArray(x: integer; var mas: array of integer): boolean;
var i, n: integer;
begin
   i := 0;
   n := length(mas) + 1;
   setLength(mas, n);
   mas[n - 1] := x;
   while not mas[i] = x do
       i:= i + 1;
   if i = n - 1 then
       Result := true
   else
       Result := false;
end;

В выделенной строке компилятор говорит, что "incompatible types". Не пойму в чем проблема.


 
Dmitrij_K   (2006-09-17 21:23) [1]

Не путай Open array и Dynamic arrays
В твоем примере mas это Open array

type  TIntegerDynArray = array of Integer;
{...}
function inArray(x: integer; var mas: TIntegerDynArray): boolean;
{...}


 
ec_stasis ©   (2006-09-17 21:36) [2]

Спасибо!



Страницы: 1 вся ветка

Текущий архив: 2006.10.08;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.046 c
6-1147765014
M@D
2006-05-16 11:36
2006.10.08
Отправка файла по почте.


6-1146497136
Pazitron_Brain
2006-05-01 19:25
2006.10.08
TIDIRC


15-1158627488
Mutnauq
2006-09-19 04:58
2006.10.08
D10Lite


15-1158126744
Ученик12
2006-09-13 09:52
2006.10.08
Ядро процессора


5-1140419056
DimaBr
2006-02-20 10:04
2006.10.08
Закрытие узла.