Даны : натуральное число N, действительные числа A1 .. A2n. Выяснить, верно ли, что для i = 1, ... , N выполнено:
Ai = 2*An-1 + A2*n-i+1;
Использовать двунаправленный список.
:molitva:
Altair
15.06.2005 6:51
В чем-же проблемма? сначала заполняем список, затем проходим по нему... все необходимое для работы с двусвязными списками есть в FAQ'e .. вот здесь: FAQ: двусвязные списки.
RIDDICK
15.06.2005 8:38
КАК проходим ? условие то такое !! я не понимаю!!!
volvo
15.06.2005 8:57
Запоминаешь элемент который находится на позиции N (в переменную element) Проходишь по списку последовательно (начиная с "головы") и проверяешь, что для каждого элемента выполняется условие:
is_ok := True; _start := { голова списка } _finish := { хвост списка } while (_start <> nil) and is_ok do begin is_ok := is_ok and (_start^.Data = (2*element - 1) + (_finish^.Data+1) ) _start := _start^.next; _finish := _finish^.prev; end; { результат - в переменной is_ok }
Подробности - в FAQ-е
RIDDICK
15.06.2005 9:15
Я прошу вас, помогите) у меня щас нету времени чтоб прочитать полностью ЧАВО ... я опаздываю на сдачу лабы) :no:
volvo
15.06.2005 9:19
А раньше думал о чем? "От сессии до сессии живут студенты весело?" Ну, так веселись дальше !
Я же тебе уже все написал, что еще надо? Как список оформить? Как его заполнить? Так это уже десятки раз делалось... Хватит, в конце концов. Опиши и заполни список сам, и подставь мой код...
RIDDICK
15.06.2005 9:44
Где взять модуль "maintype" ) ?
Altair
15.06.2005 10:32
он не нужен, просто удали строчку uses maintype;
RIDDICK
15.06.2005 19:24
все в крякозябрах
Altair
15.06.2005 21:10
где кракозябли? поконкретнее можно?
думаю просто кодировка не та
RIDDICK
16.06.2005 16:29
а как в Pascal кодировку выбрать?
hiv
16.06.2005 16:48
Перекодируй любым перекодировщиком типа TCODE или текстовым редактором, который умеет в разных кодировках работать (обычно такие текстовые редакторы используют для HTML кодинга).
RIDDICK
17.06.2005 10:28
Цитата
_start := { голова списка }
как задать голову и какой тип у "_start" ?
volvo
17.06.2005 11:42
Цитата(RIDDICK @ 17.06.05 10:28)
как задать голову и какой тип у "_start" ?
Var listHead: TList; { это будет голова списка, все операции - через нее } ...
Var _start, _finish: TList; { того же типа, что и голова... } ... is_ok := True; _start := listHead; { голова списка } _finish := listHead; { сначала присваиваем "голову" } GotoLast(_finish); { и переходим в "хвост" } ... { далее - по тексту }
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.