1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Beseech |
11.05.2007 9:50
Сообщение
#1
|
|
Новичок ![]() Группа: Пользователи Сообщений: 42 Пол: Мужской Реальное имя: Ваня Репутация: 0 |
Дан одномерный массив А из 20 элементов. Найти наибольший из отрицательных элементов массива; наименьший из положительных элементов массива(0 считать положительным числом). Вывести на экран исходный массив и найденные элементы. Если в массиве нет положительных(отрицательных) элементов, вывести на экран соответствующее сообщение.
Сообщение отредактировано: Beseech - 11.05.2007 11:17 -------------------- Skateboarding is not a crime
|
Beseech Массивы 11.05.2007 9:50
Адель var
a:array[1..20] of integer;
i,max,min:integ... 11.05.2007 10:16
Beseech Большое спс Адель,задача получилась :blum: 11.05.2007 11:19![]() ![]() |
|
Текстовая версия | 10.12.2025 23:33 |