|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.11.2015, 17:20 | #1 |
Новичок
Джуниор
Регистрация: 10.11.2015
Сообщений: 6
|
Помогите с одномерным массивом(исправьте мою ошибку в программе)
Все сделать в одной программе!
1) Вычислить значения 33 элементов одномерного целочисленного массива X в интервале (-9, 6) с использованием генератора случайных чисел. 2)Вычислить среднеквадратичное значение каждых третьих элементов второй половины массива. 3)Определить наименьший по модулю элемент первой трети массива. 4)Упорядочить чётные по значению элементы первой половины массива по убыванию обратных. Люди добрые, помогите мне в решений данной задачи, почему моя программа не работает как нужно? Вот моя программа: Код:
Последний раз редактировалось Вадим Мошев; 10.11.2015 в 17:30. |
10.11.2015, 17:44 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
во-первых, везде, где вектор должен изменяться, нужно его передавать в процедуры с модификатором VAR:
Код:
p.s. программу я не запускал. возможно, там ещё косяки есть... |
10.11.2015, 21:48 | #3 |
Новичок
Джуниор
Регистрация: 10.11.2015
Сообщений: 6
|
Проблема такова:
после запуска программы я получаю такое: Интервал значений от a= -9 до= 6 Исходные данные Размерность вектора n = 33 Интервал [-9,6] Результаты расчета Вектор X из 33 элементов в интервале [-9,6], полученных при помощи генератора случайных чисел 891 561 696 846 696 441 381 786 246 141 291 321 1086 381 891 531 831 1176 1371 -9 831 576 756 51 651 996 51 846 861 486 1296 1416 1446 среднеквадратичное значение каждых третьих элементов второй половины массива 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 S= 0 наименьший по модулю элемент первой трети масcива 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ).Program.Main()[END] неисправна программы по решению трех последних задач: 2)среднеквадратичное значение каждых третьих элементов второй половины массива 3)наименьший по модулю элемент первой трети масcива 4)Упорядочить чётные по значению элементы первой половины массива по убыванию обратных. почему выводятся одни нули? Вывод программы составлен неправильно? |
11.11.2015, 10:21 | #4 | ||
Форумчанин
Регистрация: 12.02.2011
Сообщений: 808
|
Цитата:
Цитата:
Код:
Терпение!Дежурный экстрасенс скоро свяжется с вами!
|
||
11.11.2015, 10:45 | #5 |
Форумчанин
Регистрация: 12.02.2011
Сообщений: 808
|
зачем было инициализировать массив, если вы это делаете еще раз здесь
Код:
Код:
Код:
Терпение!Дежурный экстрасенс скоро свяжется с вами!
Последний раз редактировалось Dvoishnik; 11.11.2015 в 11:15. Причина: добавил |
11.11.2015, 15:04 | #6 |
Форумчанин
Регистрация: 12.02.2011
Сообщений: 808
|
если я правильно понял задание как то так должно получится.
Код:
Терпение!Дежурный экстрасенс скоро свяжется с вами!
Последний раз редактировалось Dvoishnik; 11.11.2015 в 15:08. |
11.11.2015, 17:53 | #7 |
Новичок
Джуниор
Регистрация: 10.11.2015
Сообщений: 6
|
Я премного благодарен вам, DVOISHNIK!
Программа рабочая, все исправно. Посидел над тем, что вы написали, немного понял. Еще раз большое спасибо! Вот, что получил по вашей программе: Интервал значений от a= -9 до= 6 Исходные данные Размерность вектора n = 33 Интервал [-9,6] Результаты расчета Вектор X из 33 элементов в интервале [-9,6], полученных при помощи генератора случайных чисел -1 -6 2 6 1 6 3 -4 -7 2 1 -8 2 -1 -2 5 -4 -1 -2 2 4 0 -3 -2 -2 -3 4 2 1 4 -4 -1 2 среднеквадратичное значение каждых третьих элементов второй половины массива 2.97209241668783 наименьший по модулю элемент первой трети масcива 1 Упорядочить чётные по значению элементы первой половины массива по убыванию обратных -1 -8 -6 -4 1 -4 3 -2 -7 0 1 0 0 -1 0 5 0 -1 -2 2 4 0 -3 -2 -2 -3 4 2 1 4 -4 -1 2 |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Исправьте ошибку в программе | xxxartikxxx | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 26.11.2012 07:02 |
исправьте ошибку в программе | Tolian92 | Помощь студентам | 0 | 20.05.2012 12:38 |