Скачать: CL | DM;

массивы в 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]

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

---

← →
Digitman ©   (2005-12-22 14:56) [8]

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


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

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

---

← →
evvcom ©   (2005-12-22 15:21) [9]

> Кто-то там

Москва


> з. танька  

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

---

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

> Digitman ©   (22.12.05 14:56) [8]

стараемся.. ;)

зы а шо пароль на мыло нельзя выслать - обидно..

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.04 c