Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Одномерный массив |
| Merlin |
Сообщение
#1
|
 Пионер  Группа: Пользователи Сообщений: 114 Пол: Мужской Реальное имя: Ден Репутация:  0   |
Помогите решить задачку :
Задан упорядоченный по невозрастанию одномерный массив. 1) Найти произведение отрицательных элементов массива; 2) Найти сумму положительных элементов массива; 3) Упорядоченный по невозрастанию массив преобразовать в упорядоченный по возрастанию, оставив по одному в каждой группе совпадающих элементов. -------------------- |
   |
 
|
  |
| volvo |
Сообщение
#2
|
|
Гость |
Ну, во-первых, у тебя в задании записано, что он уже задан как упорядоченный, значит ничего дополнительно с ним делать для этого не надо...
А во вторых, то что ты привел в предыдущем посте - ошибка, т.к. у тебя получается не массив чисел, а массив строк. Паскаль это не пропустит... Посмотри как у меня написано... |
|
|
|
Merlin Одномерный массив 5.12.2005 21:38
volvo Используй Поиск + FAQ ... Уже десятки раз решалось… 5.12.2005 21:41 Merlin Насчёт пунктов 1 и 2 я почти разобрался, а вот как… 6.12.2005 2:24 volvo
Вот тебе пример:
const
a: array[1 .. 10] of int… 6.12.2005 2:34 Merlin
Это понимать как :
1. const
… 10.12.2005 19:17 Merlin
Program z;
const
a: array [1..10] of… 10.12.2005 19:40 GoodWind такой вариант в ТМТ отработал на "ура", … 10.12.2005 21:48 Merlin Всё работает, спасибо :good: , вот только
Как … 10.12.2005 23:28 klem4 Инверсия решит ;)
for i := 1 to n div 2 do begin… 10.12.2005 23:35 Merlin
Program z;
const
a: array [1..10… 12.12.2005 0:53
klem4 посмотри как у тебя описана temp ... она должна бы… 12.12.2005 1:14 |
|
Текстовая версия | 9.09.2025 2:13 |
