|
ПРОЛОГ - инверсия списка.
|
||
|---|---|---|
Участник
Откуда: Никто понятия не имеет, что происходит
Сообщения: 1 534 |
||
| 26.01.2009, 13:27:27 |
|
|
|
|
|
ПРОЛОГ - инверсия списка.
|
|||
|---|---|---|---|
|
#18+
Здравствуйте! Столкнулся с прологом :(. Нужно произвести инверсию списка. Как это осуществить? Помогите пожалуйста... Я остановился на этапе вывода всех элементов списка по порядку. Выглядит это так: res([X|L],[X|F]):-term_str(integer,X,S), dlg_Note("Элемент:",S),res(L,F). Потом вызываю эту функцию по кнопке: res([5,6,7,87,99,56,76],X) А вот как перевернуть этот список ума не прилажу... Заранее огромное человеческое спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.01.2009, 06:09:51 |
|
||
|
ПРОЛОГ - инверсия списка.
|
|||
|---|---|---|---|
|
#18+
inverse(List, Rev):- inv(List, [], Rev). inv([ ], Rev, Rev):- !. inv([H|T], SpList, Rev):- inv(T, [H|SpList], Rev). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.01.2009, 11:48:18 |
|
||
|
ПРОЛОГ - инверсия списка.
|
|||
|---|---|---|---|
|
#18+
вроде эта самая первая и простая задача, решаемая на прологе 4 8 15 16 23 42 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.01.2009, 13:27:27 |
|
||
|
ПРОЛОГ - инверсия списка.
|
|||
|---|---|---|---|
|
#18+
Aklin J пишет: > вроде эта самая первая и простая задача, решаемая на прологе Нет. Posted via ActualForum NNTP Server 1.4 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.01.2009, 17:50:44 |
|
||
|
ПРОЛОГ - инверсия списка.
|
|||
|---|---|---|---|
|
#18+
Aklin Jвроде эта самая первая и простая задача, решаемая на прологе 4 8 15 16 23 42 Скорее на лиспе ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.01.2009, 18:43:42 |
|
||
|
|
start [/forum/topic.php?fid=16&gotonew=1&tid=1344698]: |
0ms |
get settings: |
8ms |
get forum list: |
10ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
16ms |
get topic data: |
7ms |
get first new msg: |
4ms |
get forum data: |
2ms |
get page messages: |
38ms |
get tp. blocked users: |
1ms |
| others: | 205ms |
| total: | 297ms |
| 0 / 0 |
