Найти произведение четных чисел от 30 до 50.

[Poma][a]

Точно, Вадим-Зоркий_глаз.

Изначальный вариант

for : 1030
while : 329

Если вместо i mod 2 = 0 использовать not Odd(i)

for : 580
while : 319

С 15 до 25

for : 319
while : 329

[Вадим Мошев]

Сообщение от Poma][a

Точно, Вадим-Зоркий_глаз.

Изначальный вариант
for : 1030
while : 329

Если вместо i mod 2 = 0 использовать not Odd(i)
for : 580
while : 319

С 15 до 25
for : 319
while : 329

Ничего не понял, это при каких условиях? Ты учёл, что должно быть не i:=2, а i:=30?

и проверь ещё мой то сообщение, на которое ты мне отвечаешь, там есть дополнения, которых ты, возможно, не видел

[Аватар]

Сообщение от Вадим Мошев

Хотя то, что при "одинаковых" условиях while отрабатывает быстрее, для меня - сюрприз

Нет там одинаковых условий - в цикле FOR есть умножение на 2, оно и съедает все преимущества. Можно попробовать заменить его сдвигом

[Poma][a]

for i := 15 to 25 : тыц
for i := 15 to 25 with shl тыц
for i := 30 to 50 if i mod 2 = 0 тыц
for i := 30 to 50 if not Odd(i) тыц

[Arigato]

Сообщение от Вадим Мошев

Хотя то, что при "одинаковых" условиях while отрабатывает быстрее, для меня - сюрприз

Условия не одинаковые. В for присутствует лишняя операция умножения. Но ее можно заменить на shl 1, будет быстрее (на сколько - не проверял).

[eoln]

У меня дизассемблер показал, что фри паскаль и for и repeat слепил в одно и то же (логично, если учесть, что for'a в ассемблере нет) (только у варианта с while добавился один jmp). Но в цикле for была проверка на чётность, что добавило 2 инструкции (sub и lea, если память не изменяет - в обед ещё проверял).
Кстати варианты с mod и odd получились практически одинаковыми. Разница в том, что при использовании odd смещения были кратны 8, а при mod - кратны 4, всё остальное одинаково. Но это на оптимизацию компилятора списать можно

[Аватар]

В общем случае не может быть одно и тоже - FOR один раз вычисляет выражения от и до, а WHILRE и REPEAT каждый раз при проверке условия. В основном за счет этого и разная эффективность маш.кода

[Arigato]

На сколько я знаю (требуется проверка) при использовании for переменная-счетчик может быть размещена вообще в регистре, чего не будет в while.