массив, сложный даже мысли нет как хделать |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
массив, сложный даже мысли нет как хделать |
Ostin |
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
Дан одномерный массив А,размерностью1*n (2<=n<=20) элементы массива принимают от 0 до 20000 устанавливаются польхователем. Все положиттельные числа массива А записываются последовательно в массив В, а отрицательные в массив С. определить первое и последнее вхождение положительных и отрицательных чисел в массив А
|
klem4 |
Сообщение
#2
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Что уже готово ? Что конкретно не получается ?
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Ostin |
Сообщение
#3
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
|
volvo |
Сообщение
#4
|
Гость |
Цитата(Ostin @ 24.01.2006 19:02) Дан одномерный массив А,размерностью 1*n (2<=n<=20) элементы массива принимают от 0 до 20000 устанавливаются польхователем. Все положиттельные числа массива А записываются последовательно в массив В, а отрицательные в массив С. определить первое и последнее вхождение положительных и отрицательных чисел в массив А Внимание - вопрос: ОТКУДА среди чисел 0 .. 20000 взялись отрицательные? |
klem4 |
Сообщение
#5
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
nb := 0; Volvo Угу, а я и внимания не обратил ... это первая часть задания. Сообщение отредактировано: volvo - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Ostin |
Сообщение
#6
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
|
volvo |
Сообщение
#7
|
Гость |
klem4, твоя же программа, чуть-чуть подправленная будет выполнять сразу обе части задания:
neg_first := 0; neg_last := 0; Вот и все, одним проходом ... (Это, естественно, если диапазон от -20000 до +20000. Для четных/нечетных попробуй исправить сам...) |
Ostin |
Сообщение
#8
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
спасибо что помогли!
|
Ostin |
Сообщение
#9
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
вторая часть!
var Во первых пользуйся тегами, а во вторых внимательно прочитай предыдущий пост ... а еще обнулить надо! а теперь помогите мне собрать всё в одно единое! что бы работало! но надо используя не вот то что волво предлодил первая часть! Сообщение отредактировано: volvo - |
Ostin |
Сообщение
#10
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
что не так?
program stas3; |
Ostin |
Сообщение
#11
|
Пионер Группа: Пользователи Сообщений: 52 Пол: Мужской Реальное имя: Стас Репутация: -1 |
помогите мне зделать эту долбаную задачу , до завтра! без неё я на 3 могу не надеятся а с ней за 3 буду бится!
|
klem4 |
Сообщение
#12
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
program stas3; Убрал по крайней мере все синтаксические ошибки ... -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 5.05.2024 19:53 |