Показать сообщение отдельно
Старый 10.05.2014, 22:51   #4 (permalink)
molo4nik
Новичок
 
Регистрация: 10.05.2014
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

Спасибо большое за помощь!
но вот в этом цикле ошибка. h должен быть порядковым типом
Цитата:
for h:=n1 to n2 do
begin
if (h mod 2)=0 then Q:=Ln(Abs(exp(ln(b)*5)+a)) else Q:=Ln(Abs(-exp(ln(b)*5)+a));
S:=S+Q/(0.2*h);
end;
molo4nik вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070