паскаль - Паскаль, Turbo Pascal, PascalABC.NET

Дмитрий Solov · 01.12.2011, 19:09

найти нулевой элемент интерполяционным методом в одномерном массиве. программа на паскале

Дмитрий Solov · 01.12.2011, 19:18

помогите можалуйста, а то чето не получается

Mad_Cat · 01.12.2011, 19:20

Код:

l=1; u=N;
while(u>=l)  do begin
    i=l+trunc((u-l)*(-K[l])/(K[u]-K[l]));
    if(K[i])<0) then l=i+1;
    if(K[i])>0) then u=i-1;
    if (K[i])=0) break;
end;

интерполяционный поиск

Дмитрий Solov · 01.12.2011, 19:25

а полную программу можешь написать? заранее спасибо

01.12.2011, 19:09	#1
Дмитрий Solov Регистрация: 01.12.2011 Сообщений: 5	паскаль найти нулевой элемент интерполяционным методом в одномерном массиве. программа на паскале

01.12.2011, 19:20	#3
Mad_Cat Made In USSR! Старожил Регистрация: 01.09.2010 Сообщений: 3,657	Код: `l=1; u=N; while(u>=l) do begin i=l+trunc((u-l)(-K[l])/(K[u]-K[l])); if(K[i])<0) then l=i+1; if(K[i])>0) then u=i-1; if (K[i])=0) break; end;` интерполяционный поиск "...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..." (c) Юрий Клинских aka "Хой" Последний раз редактировалось Mad_Cat; 01.12.2011 в 19:47.*

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Паскаль, Борланд Паскаль-в чем разница???	Vremya-Dengy	Паскаль, Turbo Pascal, PascalABC.NET	13	31.05.2011 18:23
паскаль и турбо паскаль	Евгения Игоревна	Помощь студентам	6	05.05.2011 14:31
паскаль	chertovka.	Помощь студентам	1	15.06.2010 08:10

01.12.2011, 19:18	#2
Дмитрий Solov Регистрация: 01.12.2011 Сообщений: 5	помогите можалуйста, а то чето не получается

01.12.2011, 19:25	#4
Дмитрий Solov Регистрация: 01.12.2011 Сообщений: 5	а полную программу можешь написать? заранее спасибо