|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
05.11.2008, 20:05 | #1 |
Пользователь
Регистрация: 05.11.2008
Сообщений: 11
|
нужно исправить ошибку
условие:
Сгенерировать положительные и отрицательные псевдослучайные значение элементов одноизмеримого массива, введя количество элементов с клавиатуры. Переставить элементы массива так, чтобы сначала были расположенные все положительные элементы, потом все отрицательные. Порядок среди положительных и отрицательных элементов должен сохраниться. прога: program test; uses crt; var n,i:integer; a:array[1..20] of integer; begin clrscr; write('vvedite diapazon n='); readln(n); randomize; for i:=1 to 20 do begin a[i]:=trunc(random(n)-n/2); writeln('a[',i,']=',a[i]) end; readkey; end. ета програма генерирует псевдослучайные елементы масива, но ана не ставит сначала положытельные елементы а потом отрицательные, можете исправить ето, штоб она сначала ставила все положытельные, а потом отрицательные, при етом порядок елементов должен сохранятся.
Все орфографические ошибки принадлежат автору!
афтар ЖЖЕТ! |
05.11.2008, 20:17 | #2 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
"ета програма", "елементы масива", "но ана не ставит", "положытельные елементы", "ето, штоб", "при етом"... Да, уважаемый Карась, еще "ошыбку" (просто когда писал, перед глазами был только последний экзерсис...)
И давно во втором классе школы начинают изучать программирование? Автору: злиться и обижаться не следует. Мы попутно обучаем владению русским языком. Сами же потом спасибо скажете... Последний раз редактировалось mihali4; 05.11.2008 в 20:30. |
05.11.2008, 20:23 | #3 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
"нужно исправить ошыбку"
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
05.11.2008, 21:05 | #5 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Цитата:
|
|
05.11.2008, 21:12 | #6 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
To Vladya
Открою вам страшную тайну - эти операторы отличаются только тем, что тот, который предложили вы, тс-с-с... не переводит строку на следующую (или переводит? Убей, не помню.). Последний раз редактировалось mihali4; 05.11.2008 в 21:46. |
05.11.2008, 21:18 | #7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Еще боле страшная тайна, что как раз writeln и переводит.
|
05.11.2008, 21:38 | #8 |
Пользователь
Регистрация: 05.11.2008
Сообщений: 11
|
Я с украины, на ошибки прошу не обращать внимания.
Мне в этой программе нада всеволиш добавить "чтото" чтобы она совпадала с условием, а именно ставила сначала все цифры со знаком "+", а затем с знаком "-".
Все орфографические ошибки принадлежат автору!
афтар ЖЖЕТ! |
05.11.2008, 21:41 | #9 |
Пользователь
Регистрация: 05.11.2008
Сообщений: 11
|
Прошу не флудить просто так, а просто написать што мне нужно добавить в программе.
Все орфографические ошибки принадлежат автору!
афтар ЖЖЕТ! |
05.11.2008, 21:52 | #10 |
Форумчанин Подтвердите свой е-майл
Регистрация: 25.02.2008
Сообщений: 289
|
не очень понял условие: как ставить в определенном порядке сохраняя порядок? В твоей программе просто генерируются числа и выводятся. как понимаю я из надосначал сгенерировать(random...), потом отсортировать и вывести?
Упс...
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите исправить ошибку | artem_MG | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 27.10.2008 17:42 |
Исправить ошибку | LLIypLLIyH | Помощь студентам | 5 | 16.06.2008 16:50 |
Помогите исправить ошибку | Булат | Общие вопросы Delphi | 3 | 25.04.2008 10:01 |
помогите исправить ошибку. | alen666 | Паскаль, Turbo Pascal, PascalABC.NET | 11 | 08.03.2008 16:43 |
MySQL как исправить ошибку | Dengar | PHP | 8 | 03.03.2008 03:29 |