| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

шаг цикла [D2005, XP]

бедный студент ©   (2005-11-15 17:50:00) 

вопрос глупый, но как указать шаг цикла

---

Leonid Troyanovsky   (2005-11-15 19:06:00) [1]

> Anatoly Podgoretsky ©   (15.11.05 18:53) [6]
> бедный студент ©   (15.11.05 18:18) [4]
> используй лучше while без фокусов с индексами.


Анатолий, IMHO,  for with  2*i  vs while with i -
вопрос вкусовых (цветовых) пристрастий.

--
Regards, LVT.

---

Anatoly Podgoretsky   (2005-11-15 18:53:00) [2]

бедный студент ©   (15.11.05 18:18) [4]
используй лучше while без фокусов с индексами.

---

for   (2005-11-15 18:42:00) [3]

procedure TForm1.FormCreate(Sender: TObject);
var i,step:word;
begin
 step:=5;
 for i:= 0 to 100  do
 begin
 if  i mod step <>0 then continue;
 ListBox1.Items.add(inttostr(i));
 end;
end;

---

бедный студент   (2005-11-15 18:18:00) [4]

БОЛЬШОЕ спасибо!

---

MBo   (2005-11-15 18:14:00) [5]

c[2*i-1]:=a[i];
c[2*i]:=b[i];

---

бедный студент   (2005-11-15 18:07:00) [6]

а можно с примером: мне нужно создать массив путем смешения сужествующих двух:
for i:=1 to 20 do
  begin
 c[i]:=a[i];
 c[i+1]:=b[i];
end;
так вот нужно указать шаг цикла равный 2....
Или есть другое решение? если да, то подскажите пожалуйста..

---

MBo   (2005-11-15 17:56:00) [7]

используй цикл While или в For заведи доп. переменную

---

Наверх