VPF::Сумма элементов массива - Форум программистов

VICTAR

Дата 17.3.2008, 23:13 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 10
Всего: 80

Не сложно, если понимаешь что делаешь.
Мне трудно сообразить что за алгоритм ты придумал =)

neweraser

Дата 17.3.2008, 23:28 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6

не знаю, как правильно сравнить

Код


.........................
for z:= 0 to high(lDest) do
for x:=0 to listbox3.Items.Count - 1 do
if lDest[z] = StrToInt(listbox3.Items.Text) {тут по-разному пробовал} then ...
..........................

как-то так пытаюсь начать, выдает ошибки

--------------------

Кто ищет, тот всегда найдет.

VICTAR

Дата 17.3.2008, 23:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 10
Всего: 80

listbox3.Items[x]

Это сообщение отредактировал(а) VICTAR - 17.3.2008, 23:39

neweraser

Дата 18.3.2008, 00:26 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 598
Регистрация: 17.2.2008

Репутация: нет
Всего: 6

вот что получилось, и это, естественно, неправильно...

Код


for z:= 0 to high(lDest) do
  for x:=0 to listbox3.Items.Count - 1 do
  if lDest[z] = StrToInt(listbox3.Items[x]) then
    for c:=0 to listbox2.Items.Count - 1 do
    if listbox3.Items[x] = listbox2.Items[c] then //вот тут не понимаю, сравнив. элементы или номера строк?
      for v:= 0 to length(lDest) do
      listbox4.Items.Add(listbox2.Items[c]);

--------------------

Кто ищет, тот всегда найдет.

Beltar

Дата 18.3.2008, 12:55 (ссылка)

(голосов:2)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 627
Регистрация: 11.1.2006

Репутация: 0
Всего: 7

В offtopic

Нет, народ, все когда-то ламерами были, но когда я увидел тему "Сумма элементов массива, посчитать сумму элементов" в которой уже 4 стр. я накинулся на нее, как на хитрозакрученный детектив. Х) Смеяться не буду, т. к. сам порой дико туплю и глупости спрашиваю.

2 neweraser:

Если тебе надо в школе\инсте сделать лабу и забыть про Delphi раз и навсегда, лучше просто приведи точно задание и попроси сделать. Одногрупник отличник сделает его за баллон пива. Если надо понять, то есть книги и великая кнопка, без которой программы не пишутся, называется F1.

--------------------

Опытный программист на C++ легко решает любые не существующие в Паскале проблемы. smile

(с) я, хотя может и нет
Пищущий на C++ мужик. Даже если это мужик сидит в написанном на Delphi и жрущем паскалевскую библиотеку билдере.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »