25.01.2010, 00:32
|
|
Участник форума
Регистрация: 10.08.2009
Сообщений: 238
Провел на форуме:
724939
Репутация:
108
|
|
Когда увидел строку
for i:=1 to ((StrToInt(edt2.text) div 2) + (StrToInt(edt2.text) mod 2)) do
хотел поругать, но слеш уже все написал как нельзя лучше )))
Давайте обьясним почему это плохо. Потому что за каждый проход цикла делается команда StrToInt(edt2.text) div 2. Вместо этого можно было создать переменную и сделать так:
Код:
n := StrToInt(edt2.text) div 2;
m := StrToInt(edt2.text) mod 2;
for i:=1 to n+m do
Ну а вообще слеш уже все обьяснил.
Последний раз редактировалось =Zeus=; 25.01.2010 в 00:37..
|
|
|