"Динамические массивы" в Delphi

[s-andriano]

Сообщение от Valio

С точки зрения математики фраза "массива длиной N" говорит о том, что массив конечен.

Вы видели бесконечные массивы?

...ибо процедура ничего не возвращает.

procedure a(var b : boolean);
begin
  b := TRUE;
end;

Не?

[Valio]

Я могу найти 100500 тем на этом форуме где в задачах фигурируют буквы, которые указывает размер массива и где не применяют динамический массив, ибо как я уже и сказал эти буквы не подразумевают динамический массив в явном виде.

Задан двумерный массив целых чисел А размером N на M. найти максимальный элемент и поменять его местами с A[1,1].

http://www.programmersforum.ru/showt...E0%F1%F1%E8%E2

Задан двумерный массив целых чисел А размером N на M, состоящий из положительных и отрицательных чиселю Найти количество отрицательных элементов этого массива делящихся на 2 , и их сумму.( решить матрицей)

http://www.programmersforum.ru/showt...E0%F1%F1%E8%E2

и т.д.

Не?

Ну а это вообще рукалицо. Я просто приведу типичную фразу из книги:

Процедура Delphi просто выполняет требуемые операции, но никаких результатов своих действий не возвращает. Результат - в тех изменениях, которые произошли в программе в процессе выполнения этой процедуры. В частности, процедура может поменять значения переменных, записать новые значения в ячейки компонентов, сделать запись в файл и т.д.

Ну или придётся переписать историю (с)

[Arhangel7]

Сообщение от Hacker19_90

наверно потому, что

а тут что
в процесе работы алгоритма проги массив меняет свою длинну ?
длинна постоянна в процессе сего кода, значит длинна одномерного массива задается в начале кода, значит это - Статический массив, точка

[s-andriano]

Сообщение от Valio

Я могу найти 100500 тем на этом форуме где в задачах фигурируют буквы, которые указывает размер массива и где не применяют динамический массив, ибо как я уже и сказал эти буквы не подразумевают динамический массив в явном виде.

Так с этим никто не спорит.
Просто попытались высказать некоторые предположения, каким образом в данной задаче использовать то, что заявлено в названии темы.
И обратили внимание на то, что требование ввода имени файла пользователем говорит как раз в пользу сделанных предположений.

[Hacker19_90]

длинна постоянна в процессе сего кода, значит длинна одномерного массива задается в начале кода, значит это - Статический массив, точка

Не спорю!Вы правы!
Но с другой стороны если всё таки не ясно чему равно N и собственно как говорили выше это константа или переменная, ИМХО лучше использовать динамику.

Длина постоянна

Да! Но чему Она равна? Это не известно!
Поэтому ИМХО городить вот такое

var
const
  Nmax = 100;
var
  a: array[1..Nmax] of integer;
  N, i: integer;
begin
  ReadLn (N); {ПРИЧЁМ ТУТ ЕЩЁ И ПРОВЕРЯТЬ НАДО}
  for i := 1 to N do
    Read(a[i]);
end.

не целесообразно!
Ибо всё таки с делфи имеем дело, которая умеет работать с дин. массивами!
НО КАК Я СКАЗАЛ, Это моё мнение!
ну и не будем забывать название темы!

+ ко всему
2Valio
Про анализировав ваши ссылки, которые вы предоставили
в качестве

Я могу найти 100500 тем на этом форуме где в задачах фигурируют буквы, которые указывает размер массива и где не применяют динамический массив, ибо как я уже и сказал эти буквы не подразумевают динамический массив в явном виде.

Могу вам сказать, что собственно они и не могли подразумевать динамику
ибо писать просили под паскаль и как я понимаю под TURBO а в нём НЕТ динамических массивов!!
Возможно что под FPC но... чётко не указано! А поэтому лучше перестраховаться!

[qwe1qwe2qwe3]

Так может кто нибудь помочь?

[s-andriano]

Сообщение от qwe1qwe2qwe3

Так может кто нибудь помочь?

Неужели самого факта наличия двух страниц обсуждения недостаточно, чтобы понять, что Вы неясно сформулировали условие задачи?

[Stilet]

как я понимаю под TURBO а в нём динамики НЕТ!

Есть. Еще какая. Просто ты не умеешь работать с указателями.

[Hacker19_90]

Есть. Еще какая. Просто ты не умеешь работать с указателями.

Не правильно выразился!
Под этими словами я имел ввиду того, что в TP7 нет динамических массивов!
(нет их можно получить путём хитрых манипуляций) НО! подобных делфи в ТП нет!

[Serge_Bliznykov]

Други! Автору топика нужно решение в Delphi.
Чего вас в сторону ТурбоПаскаля понесло ?!

я лично считаю, что автору топика абсолютно НЕ НУЖНЫ динамические массивы.
но, раз уж он так их хочет, неужели это ПРИНЦИПИАЛЬНО меняет решение?!

вместо

const N = 1000;
type
  TMyArray = array[0..N-1] of integer;

var
  Ar1 : TMyArray;

<что-то делаем с массивом Ar1>

написать

type
  TMyArray = array of integer;

var
  N : integer;
  Ar1 : TMyArray;
begin
   Взять N откудаУгодно! например, для консоли:
   WriteLn('Введите размер массива N');
   Readln(N);

   SetLength(Ar1, N);

<что-то делаем с массивом Ar1>

зачем столько копий сломано в этой теме?!!

ну и сорри за оффтоп!

Сообщение от Hacker19_90

ибо писать просили под паскаль и как я понимаю под TURBO а в нём НЕТ динамических массивов!!

Сообщение от Stilet

Есть. Еще какая. Просто ты не умеешь работать с указателями.

мы с s-andriano в личке четыре дня (около 9 сообщений с каждой стороны) дискутировали, есть в ТурбоПаскаль динамические массивы, или нет.
кратенько о доводах:
я утверждал, что нет - а хакерские трюки, когда объявляется указатель на массив и дальше работа идёт через этот указатель - это не наличие динамических массивов в языке. А коллега s-andriano утверждал, что раз память выделяется динамически (это бесспорно), то все переменные, размещённые в этой памяти - динамические. И следовательно, подобные методы ничуть не хакерские и вполне себе даже повсеместно использовались на практике (в реальных программных реализациях на TP).


p.s. to s-andriano,
говорил же, надо в паблике было обсуждать проблему.. Уже не первый раз этот диспут возникает...