массивы в Delphi

← →
Allocal (2005-12-22 14:32) [0]

Доброго времени суток. Начал программировать на Delphi, но никак не могу понять массивы. Перечитал много литературы задание следующее:

Вводится массив, состоящий из 0 и 1. Серией назовем последовательность подряд идущих 0 или 1. Сколько серий в данном массиве.Наиболее предпочтительным элементом для ввода и вывода массива является ListBox.

Пожалуйста помогите разобраться. Заранее спасибо

← →
Johnmen © (2005-12-22 14:34) [1]

offtop

Поздно начал программировать, уже скоро сдавать. Не успеешь, если сырцов не кинут...:)

end offtop

← →
Allocal (2005-12-22 14:37) [2]

и кто же ты у нас??

← →
Tonich © (2005-12-22 14:43) [3]

> Allocal (22.12.05 14:37) [2]

))))))))))))) ну он точно не сырец )))))

← →
з. танька (2005-12-22 14:43) [4]

//шо за литературу ты читал? "курочку рябу" чтоли?
//кнопка F1 твой друг!

var series: integer; begin series := 1; if listbox1.count > 1 then for i := 1 to listbox1.count-1 do if listbox1.items[i] <> listbox1.items[i-1] then inc(series); ShowMessage("number of series: " + intToStr(series)); end; //если прально поняла

← →
Allocal (2005-12-22 14:46) [5]

> //шо за литературу ты читал? "курочку рябу" чтоли?
> //кнопка F1 твой друг!
>
> var
> series: integer;
> begin
> series := 1;
> if listbox1.count > 1 then
> for i := 1 to listbox1.count-1 do
> if listbox1.items[i] <> listbox1.items[i-1] then inc(series);
>
> ShowMessage("number of series: " + intToStr(series));
> end;
> //если прально поняла

я смотрю здесь шутники большие (

← →
з. танька (2005-12-22 14:50) [6]

> Allocal (22.12.05 14:46) [5]

шо тебе не нравится?
объясни нормально чего тебе надо

← →
Allocal (2005-12-22 14:51) [7]

да нет все в порядке спасибо за помощь

> з. танька (22.12.05 14:43) [4]
> //шо за литературу ты читал? "курочку рябу" чтоли?
> //кнопка F1 твой друг!

Малацца, з.танька !)

"Наш человек !"(с) Кто-то там слезам не верит ...)

> Кто-то там

Москва

> з. танька

пароль никак не вспомнишь? :) надо было на бумажку записать :)

← →
з. танька (2005-12-22 17:46) [10]

массивы в Delphi Найти похожие ветки