![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
Rom1k |
![]()
Сообщение
#21
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 119 Пол: Мужской Репутация: ![]() ![]() ![]() |
я всё перепроверил.теперь прога работает правильно только как мне в конце убрать эту кучу нулей? файл прекрепил!!!
Прикрепленные файлы ![]() |
volvo |
![]()
Сообщение
#22
|
Гость ![]() |
Присоединяй программу полностью, и данные, с которыми тестировал - тоже...
|
klem4 |
![]()
Сообщение
#23
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
...
Цитата for i:=1 to na do read(one[k]); ![]() -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Rom1k |
![]()
Сообщение
#24
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 119 Пол: Мужской Репутация: ![]() ![]() ![]() |
не понял что-то?!
![]() Сообщение отредактировано: Rom1k - 30.04.2007 21:09 |
volvo |
![]()
Сообщение
#25
|
Гость ![]() |
Кроме этого:
замени for i := 1 to 2 * size do на for i := 1 to n_a + n_b do |
klem4 |
![]()
Сообщение
#26
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Дальше больше
Цитата for i:=1 to nb do read(two[j]); Цитата не понял что-то?! Если цикл по i, то и читать видимо надо one[i] а не one[k] .... C two тоже самое -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Rom1k |
![]()
Сообщение
#27
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 119 Пол: Мужской Репутация: ![]() ![]() ![]() |
вот полностью переделанный вариант,да и он не работает правильно.
Может сортировка не правильная? или что-то ещё? Прикрепленные файлы ![]() |
klem4 |
![]()
Сообщение
#28
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
При каких данных-то ?!
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
![]()
Сообщение
#29
|
Гость ![]() |
Ты можешь ДАННЫЕ, с которыми тестируешь, привести, или это военная тайна? Почему надо все время по 15 раз одно и то же повторять?
Сообщение отредактировано: volvo - 30.04.2007 21:19 |
Rom1k |
![]()
Сообщение
#30
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 119 Пол: Мужской Репутация: ![]() ![]() ![]() |
я ввожу 2 массива
массив А: 4 5 77 1 массив В: 76 45 3 2 6 7 вот что он мне выдаёт на выходе : 4 5 76 45 3 2 6 7 77 1 ![]() |
klem4 |
![]()
Сообщение
#31
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
![]() ![]() Цитата(Rom1k) Даны два упорядоченные массива А и В.Образовать из элементов массива упорядоченный массив С. Ты бы хоть задание прочитал ... ![]() -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Rom1k |
![]()
Сообщение
#32
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 119 Пол: Мужской Репутация: ![]() ![]() ![]() |
блиннннннннннннннннннн.сорри!!!! спасибо большое.с меня пиво!
![]() |
![]() ![]() |
![]() |
Текстовая версия | 20.07.2025 6:52 |