Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];
Вниз
шаг цикла Найти похожие ветки
← →
бедный студент © (2005-11-15 17:50) [0]вопрос глупый, но как указать шаг цикла
← →
MBo © (2005-11-15 17:56) [1]используй цикл While или в For заведи доп. переменную
← →
бедный студент © (2005-11-15 18:07) [2]а можно с примером: мне нужно создать массив путем смешения сужествующих двух:
for i:=1 to 20 do
begin
c[i]:=a[i];
c[i+1]:=b[i];
end;
так вот нужно указать шаг цикла равный 2....
Или есть другое решение? если да, то подскажите пожалуйста..
← →
MBo © (2005-11-15 18:14) [3]c[2*i-1]:=a[i];
c[2*i]:=b[i];
← →
бедный студент © (2005-11-15 18:18) [4]БОЛЬШОЕ спасибо!
← →
for (2005-11-15 18:42) [5]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;
← →
Anatoly Podgoretsky © (2005-11-15 18:53) [6]бедный студент © (15.11.05 18:18) [4]
используй лучше while без фокусов с индексами.
← →
Leonid Troyanovsky © (2005-11-15 19:06) [7]
> 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.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.032 c