Показать сообщение отдельно
  #8  
Старый 04.07.2012, 22:14
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

Интересные рассчеты. Во-первых,
Цитата:
Код:
if (Gx(En)=gamma) then EL:=(En/Ep); 
Зачем искать (En/Ep), если заведомо известно что оно = (1+i/20);
Во-вторых, зачем передавать в функцию El() параметр i, если он внутри пробегает значения
Цитата:
Код:
for i:=0 to 20000 do
, и, как известно, делается неопределенным. Код построен неверно сначала, что тут говорить.
Ответить с цитированием