Цикл с параметром

@Mad_Dog · Регистрация: 01.06.2010

Студворк — интернет-сервис помощи студентам

Если в процессе цикла содержимое списка (List) не изменяется, то я бы рекомендовал инвариантное вычисление (List.Count-1) вынести за пределы цикла...

Code
1
2
3
4
5
cnt:=List.Count-1;
for i:=0 to cnt do
  begin
    //здесь тело цикла
  end;

@i8085 · 25.07.2010, 06:11

Mad_Dog, в любом цикле for число повторов цикла всегда вычисляется заранее. Почитайте Help.

@Mad_Dog · 25.07.2010, 11:50 **[ТС]**

i8085, изучай объектно-ориентированное программирование, а конкретно вызов методов!!!
Вот это

Delphi
1
List.Count

есть ни что иное, как вызов метода Count объекта List, а не значение переменной List.Count.

И этот метод будет вызываться при каждой итерации цикла!!! Так что удели свое время еще и оптимизации кода в программах...

@Хохол · 25.07.2010, 12:20

Mad_Dog,

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
{$apptype console}
 
function f:integer;
begin
writeln('f');
result := 5;
end;
 
var i : integer;
 
begin
for i := 1 to  f do
  ;
readln;
end.

@Mad_Dog · 25.07.2010, 12:31 **[ТС]**

Хохол, и что это??? и к чему все это???

@Хохол · 25.07.2010, 12:35

Начальное и конечное значение параметра цикла вычисляется один раз.

@Mad_Dog · 25.07.2010, 12:41 **[ТС]**

Хохол, а где тут объекты и вызовы методов этих объектов????

@Хохол · 25.07.2010, 12:42

Mad_Dog, а какая разница?

@Mad_Dog · 25.07.2010, 12:46 **[ТС]**

Хохол, ты меня чуть не убил!!!
Посмотри следующий код и скажи ка мне будет ли он правильно работать:

Delphi
1
2
for j:=0 to ListBox.Items.Count-1 do
  ListBox.Items.Delete(j);

@Хохол · 25.07.2010, 12:51

Mad_Dog,

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
{$apptype console}
 
type SomeClass = class
public
  function f:integer;
end;
 
function SomeClass.f;
begin
writeln('f');
result := 5;
end;
 
var i : integer;
s : SomeClass;
 
begin
s := SomeClass.Create;
for i := 1 to  s.f do
  ;
readln;
end.

Не знаю, что вы понимаете под правильностью работы своего кода, но половина цикла в нем будет прогнана вхолостую.

@Mad_Dog · 25.07.2010, 12:55 **[ТС]**

Я много занимался анализом подобных циклов и у меня есть опыт работы с такими вещами, поэтому впустую спорить не буду и останусь при своем мнении. А этот код вполовину впустую работать не будет, так как возникнет исключительная ситуация при выходе за границы цикла... Потому, что при удалении итемов значение ListBox.Items.Count уменьшается...

@Хохол · 25.07.2010, 13:03

Ну значит про ваш код я наврал из-за незнания ListBox. А про подобные циклы - вы не можете запустить мой код и посмотреть, что он выведет?

Добавлено через 3 минуты
Делфи хелп:

For purposes of controlling execution of the loop, the expressions initialValue and finalValue are evaluated only once, before the loop begins.

Добавлено через 3 минуты
А ваш код, кстати, опровергает ваше же мнение. Раз происходит ошибка выхода за границы.

@Mad_Dog · 25.07.2010, 13:03 **[ТС]**

А ты напиши в теле цикла операцию уменьшения значения верхней границы цикла и посмотри как она будет изменяться в отладчике... Именно это у меня и сделано (неявно). Ну все, я закончил флудильню... Я просто к тому, что инвариантные вычисления нужно выносить за пределы циклов. А вызов метода ListBox.Items.Count и есть то самое инвариантное вычисление... Значение ListBox.Items.Count может и не изменяться, но вычисляться оно будет каждый раз при проверке выхода параметра цикла за верхнюю границу... Просто нужно разбираться где это константа, а где занчение изменяемое и вычисляемое...

@Хохол · 25.07.2010, 13:07

А ты напиши в теле цикла операцию уменьшения значения верхней границы цикла

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
{$apptype console}
 
var n,i : integer;
begin
n := 5;
for i := 1 to  n do
  begin
  writeln('boo');
  dec(n);
  end;
 
readln;
end.

Добавлено через 1 минуту
Ну почему же флудильня. Конструктивный спор, помогающий вам избавиться от (возможно, вредного) заблуждения. Разве что оффтоп немного.

@Mad_Dog · 25.07.2010, 13:13 **[ТС]**

Да ты не путай переменные целочисленного типа в качестве верхней границы цикла и вызов метода объекта, возвращающий значение верхней границы цикла. Мы говорим о совершенно разных вещах, а ты мне доказываешь, что я заблуждаюсь...

@Хохол · 25.07.2010, 13:18

Я не согласен со следующей фразой:

Сообщение от Mad_Dog

Вот это

Delphi
1
List.Count

есть ни что иное, как вызов метода Count объекта List, а не значение переменной List.Count. И этот метод будет вызываться при каждой итерации цикла!!!

Вы утверждаете, что метод будет вызываться при каждой итерации цикла. Я показал, что это не так.

@Mad_Dog · 25.07.2010, 13:22 **[ТС]**

Ой, да ради Бога, продолжай заблуждаться и дальше...

@Хохол · 25.07.2010, 13:24

Мда, упрямство редкостное. Ну, ради бога.

@Mad_Dog · 25.07.2010, 13:25 **[ТС]**

Упрямство, основанное на собственном опыте...

@Хохол · 25.07.2010, 13:28

Не по теме:

Черт, видимо я тоже упрямый.

Сообщение от Mad_Dog

Вот это

Delphi
1
List.Count

есть ни что иное, как вызов метода Count объекта List, а не значение переменной List.Count. И этот метод будет вызываться при каждой итерации цикла!!!

Можете ли вы привести из собственного опыта кусок кода, доказывающий это утверждение?

Новые блоги и статьи Все статьи Все блоги /
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

@i8085 3758 / 2637 / 580 Регистрация: 11.09.2009 Сообщений: 9,416
	25.07.2010, 06:11
	Mad_Dog, в любом цикле for число повторов цикла всегда вычисляется заранее. Почитайте Help. 1

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 12:31 [ТС]
	Хохол, и что это??? и к чему все это??? 0

@Хохол 476 / 444 / 34 Регистрация: 20.11.2009 Сообщений: 1,293
	25.07.2010, 12:35
	Начальное и конечное значение параметра цикла вычисляется один раз. 1

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 12:41 [ТС]
	Хохол, а где тут объекты и вызовы методов этих объектов???? 0

@Хохол 476 / 444 / 34 Регистрация: 20.11.2009 Сообщений: 1,293
	25.07.2010, 12:42
	Mad_Dog, а какая разница? 1

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 12:55 [ТС]
	Я много занимался анализом подобных циклов и у меня есть опыт работы с такими вещами, поэтому впустую спорить не буду и останусь при своем мнении. А этот код вполовину впустую работать не будет, так как возникнет исключительная ситуация при выходе за границы цикла... Потому, что при удалении итемов значение ListBox.Items.Count уменьшается... 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 13:03 [ТС]
	А ты напиши в теле цикла операцию уменьшения значения верхней границы цикла и посмотри как она будет изменяться в отладчике... Именно это у меня и сделано (неявно). Ну все, я закончил флудильню... Я просто к тому, что инвариантные вычисления нужно выносить за пределы циклов. А вызов метода ListBox.Items.Count и есть то самое инвариантное вычисление... Значение ListBox.Items.Count может и не изменяться, но вычисляться оно будет каждый раз при проверке выхода параметра цикла за верхнюю границу... Просто нужно разбираться где это константа, а где занчение изменяемое и вычисляемое... 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 13:13 [ТС]
	Да ты не путай переменные целочисленного типа в качестве верхней границы цикла и вызов метода объекта, возвращающий значение верхней границы цикла. Мы говорим о совершенно разных вещах, а ты мне доказываешь, что я заблуждаюсь... 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 13:22 [ТС]
	Ой, да ради Бога, продолжай заблуждаться и дальше... 0

@Хохол 476 / 444 / 34 Регистрация: 20.11.2009 Сообщений: 1,293
	25.07.2010, 13:24
	Мда, упрямство редкостное. Ну, ради бога. 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	25.07.2010, 13:25 [ТС]
	Упрямство, основанное на собственном опыте... 0