Моё меню Общее меню Сообщество Правила форума Все прочитано
Вернуться   uForum.uz > ИКТ и телеком > IT-индустрия > Софт > Программирование > Pascal, Delphi & Builder
Сообщения за день Поиск
Знаете ли Вы, что ...
...для каждой темы существует свой раздел. Изучите структуру форума. Если соответствующего раздела нет, то всегда есть раздел "Разное" :)
<< Предыдущий совет - Случайный совет - Следующий совет >>

Pascal, Delphi & Builder Вопросы программирования касающиеся Pascal и Delphi


Ответить

 
Опции темы Опции просмотра
Старый 12.05.2009 17:26   #21  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
Цитата:
Сообщение от sergeyf1 Посмотреть сообщение
Задача 10. Составить программу на языке программирования и в блок-схеме. Даны две последовательности целых чисел. Выяснить является ли вторая последовательность подпоследовательностью первой, то есть можно ли из первой вычеркнуть некоторые члены так, чтобы осталась вторая.
А эта задачка тоже не такая простая, как может показаться. Начинать нужно с двух сторон одновременно. В большей последовательности искать первый и последний элементы меньшей последовательности, соответственно зачеркивая элементы сначала и с конца. Далее берутся 2-й и предпоследний элемент меньшей последовательности и ищится с той же логикой в остатке "большей" последовательности. Процесс продолжается до тех пор, пока либо такие элементы не найдутся либо закончатся элементы в одной или в другой последовательности...
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Реклама и уведомления
Старый 12.05.2009 17:32   #22  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
Цитата:
Сообщение от sergeyf1 Посмотреть сообщение
Задача 11. Составить программу на языке программирования и в блок-схеме. Напечатать все перестановки 1…n так, чтобы каждая следующая перестановка получалась из предыдущей путём перестановки двух соседних чисел.
Я знаю несколько алгоритмов построения всех перестановок, знаю вариант, при котором есть одна перестановка двух числе, но НЕ знаю того, в котором есть только перестановки двух соседних. Это точно не ошибка?
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Старый 12.05.2009 19:23   #23  
uParty Member Known ID Group
Аватар для DarkUser
Оффлайн
Служу Его Божественной Тени!
Сообщений: 1,671
+ 4,505  1,372/657
– 164  33/27

Uzbekistan
Цитата:
Сообщение от Nadir Zaitov Посмотреть сообщение
А эта задачка тоже не такая простая, как может показаться
Цитата:
st1, st2: string;

write('введите элементы 1-й последовательности через запятую: ');
readln(st1);

write('введите элементы 2-й последовательности через запятую: ');
readln(st2);

if pos(st2, st1) > 0
then writeln('являецца')
else writeln('нифига');
__________________
Are you my mommy?
Ответить 
Старый 13.05.2009 22:27   #24  
Аватар для Наташа
Оффлайн
Сообщений: 1,306
+ 885  788/480
– 0  51/26

Germany
вот вам десятая задачка
Ответить 
2 "+" от:
Старый 14.05.2009 10:18   #25  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
Цитата:
Сообщение от sergeyf1 Посмотреть сообщение
Задача 11. Составить программу на языке программирования и в блок-схеме. Напечатать все перестановки 1…n так, чтобы каждая следующая перестановка получалась из предыдущей путём перестановки двух соседних чисел.
Кто знает? Можно получить полный перебор методом пузырька?
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Старый 14.05.2009 10:28   #26  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
DarkUser,
Мне кажется вы не поняли задачку она приблизительно такая:

A: 1,2,3,4,5,6,7,8,9,10

B: 2,5,9

B - подпоследовательность А, так как в А нужно зачеркнуть 1,3,4,6,7,8 и 10.

Цитата:
Сообщение от Наташа Посмотреть сообщение
вот вам десятая задачка
действительно, у нас ведь не требуется оптимальность. Можно перебирать только с одной стороны
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Старый 14.05.2009 11:47   #27  
uParty Member Known ID Group
Аватар для DarkUser
Оффлайн
Служу Его Божественной Тени!
Сообщений: 1,671
+ 4,505  1,372/657
– 164  33/27

Uzbekistan
Цитата:
Сообщение от Nadir Zaitov Посмотреть сообщение
Напечатать все перестановки 1…n так, чтобы каждая следующая перестановка получалась из предыдущей путём перестановки двух соседних чисел.
Есть подозрение, что перестановки могут повторятся...

Цитата:
Сообщение от Nadir Zaitov Посмотреть сообщение
DarkUser,
Мне кажется вы не поняли задачку она приблизительно такая:
аха, после блок-схемы Наташи сообразил
__________________
Are you my mommy?
Ответить 
Старый 14.05.2009 15:10   #28  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
Цитата:
Сообщение от DarkUser Посмотреть сообщение
Есть подозрение, что перестановки могут повторятся...
Нет. Нужно без повторений.
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Реклама и уведомления
Старый 14.05.2009 15:26   #29  
Real ID Group uParty Member Ultimate
Аватар для Nadir Zaitov
Оффлайн
Сообщений: 13,210
+ 4,958  9,176/3,940
– 170  137/105

UzbekistanОтправить сообщение для Nadir Zaitov с помощью Skype™
Цитата:
Сообщение от Nadir Zaitov Посмотреть сообщение
Нет. Нужно без повторений.
Вроде б работать должно как-то так:

Цитата:
1234
2134
2314
2341
3241
3214
3124
1324
1342
3142
3412
3421
4321
4312
4132
1432
1423
4123
4213
4231
2431
2413
2143
1243
1234
Над програмкой думаю, но она не простая
__________________
Тот факт, что медуза выжила 650 миллионов лет без мозгов, даёт надежду многим.
Ответить 
Старый 14.05.2009 16:16   #30  
uParty Member Known ID Group
Аватар для DarkUser
Оффлайн
Служу Его Божественной Тени!
Сообщений: 1,671
+ 4,505  1,372/657
– 164  33/27

Uzbekistan
Цитата:
Сообщение от Nadir Zaitov Посмотреть сообщение
Вроде б работать должно как-то так:
похоже, но закономерность не уловил... разве что сначала строить все перестановки, а потом искать цепочку, в которую их можно объеденить...
__________________
Are you my mommy?
Ответить 
Ответить




Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Advertisement System V2.5 By Branden
OOO «Единый интегратор UZINFOCOM»


Новые 24 часа Кто на форуме Новички Поиск Кабинет Все прочитано Вверх