 Одномерный массив |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Merlin |
 5.12.2005 17:38
Сообщение
#1
|
 Пионер  Группа: Пользователи Сообщений: 114 Пол: Мужской Реальное имя: Ден Репутация:  0   |
Помогите решить задачку :
Задан упорядоченный по невозрастанию одномерный массив. 1) Найти произведение отрицательных элементов массива; 2) Найти сумму положительных элементов массива; 3) Упорядоченный по невозрастанию массив преобразовать в упорядоченный по возрастанию, оставив по одному в каждой группе совпадающих элементов. -------------------- |
   |
 
|
  |
Ответов
| klem4 |
11.12.2005 21:14
Сообщение
#2
|
 Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
посмотри как у тебя описана temp ... она должна быть не тип массива, а тип элемента массива
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
Сообщений в этой теме
Merlin Одномерный массив 5.12.2005 17:38
volvo Используй Поиск + FAQ ... Уже десятки раз решалось... 5.12.2005 17:41 Merlin Насчёт пунктов 1 и 2 я почти разобрался, а вот как... 5.12.2005 22:24 volvo
Вот тебе пример:
const
a: array[1 .. 10] of int... 5.12.2005 22:34 Merlin
Это понимать как :
1. const
... 10.12.2005 15:17 volvo Ну, во-первых, у тебя в задании записано, что он у... 10.12.2005 15:23 Merlin
Program z;
const
a: array [1..10] of... 10.12.2005 15:40 GoodWind такой вариант в ТМТ отработал на "ура", ... 10.12.2005 17:48 Merlin Всё работает, спасибо :good: , вот только
Как ... 10.12.2005 19:28 klem4 Инверсия решит ;)
for i := 1 to n div 2 do begin... 10.12.2005 19:35 Merlin
Program z;
const
a: array [1..10... 11.12.2005 20:53
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 6.11.2025 17:35 |