Вниз
Скачать: CL | DM;

Есть ли в цикле for оператор котор переберал каждую вторую запись   Найти похожие ветки 

← →
maxim2 ©   (2002-07-23 08:20) [0]

Привет всем
Вот и все.


← →
RV ©   (2002-07-23 08:37) [1]

если ему налить, то он будет в состоянии тока каждую третью запись перебирать


← →
MBo ©   (2002-07-23 08:50) [2]

1. for i:=1 to 10 do
zapis(2*i):=...

2. for i:=1 to 10 do
if not odd(i) then
zapis(i):=...
3. i:=0;
while i<=10 do begin
inc(i,2);
zapis(i):=...
end;

и т.д. и т.п.


← →
Proton ©   (2002-07-23 11:28) [3]

var i:integer;
begin
for i:=1 to 100 do
if i mod 2 = 0 then
memo1.lines.add(inttostr(i));
for i:=1 to 100 do
if i mod 2 = 1 then
memo1.lines.add(inttostr(i));
end;


← →
Skier ©   (2002-07-23 11:31) [4]

>maxim2
и ещё... есть такая штука как Continue...


← →
Captain   (2002-07-27 13:42) [5]

В таких случаях обычно используют while или repeat, а внутри цикла наращивают переменную-счетчик


← →
Anatoly Podgoretsky ©   (2002-07-27 13:54) [6]

В for можно использовать только перечислимые типы, с шагои 1
Для остальных случаев надо использовать while



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

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



Память: 0.46 MB
Время: 0.009 c
3-23940
Dimedrol
2002-07-17 18:55
2002.08.08
Creating TRIGGER (FireBird, QuickDesk)


8-24131
новенький в Делфи
2002-04-01 02:33
2002.08.08
DelphiX


3-23873
Борис
2002-07-17 09:58
2002.08.08
Как оптимизировать вычисление одного столбца от друго(код внутри)


1-23985
cherepovets
2002-07-27 13:59
2002.08.08
Панель задач


4-24267
Baz
2002-05-31 17:27
2002.08.08
Обработка сообщения WM_SIZING




   Наверх