Тема
:
Найти ошибку в математических формулах. Pascal
Показать сообщение отдельно
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
Посмотреть профиль
Найти ещё сообщения от molo4nik
Ads
Яндекс
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация:
55070