|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.12.2016, 00:28 | #1 |
Регистрация: 15.12.2016
Сообщений: 6
|
Подпрограммы-процедуры в Delphi. Найти наименьшие положительные элементы и их порядковые номера в массиве
Условие программы:Найти наименьшие положительные элементы и их порядковые номера массивов X(N), Y(M)
В чем ошибка? Помогите, пожалуйста. Сколько не пыталась все не получается сделать минимальное положительное число в подпрограмме. Код:
Последний раз редактировалось emalf; 15.12.2016 в 02:09. |
15.12.2016, 01:17 | #2 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
Код:
А если в массиве вообще не окажется положительных, то что надо возвращать ? |
15.12.2016, 01:39 | #3 |
Регистрация: 15.12.2016
Сообщений: 6
|
Я исправила, но больше я не знаю что делать с этой подпрограммой. Куда вписывать
Код:
|
15.12.2016, 01:49 | #4 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
Если у вас type vector начинается с индекса 1, то можно при отсутствии положительных сделать, чтоб возвращало n=0.
И проверять например так Код:
Написано procedure min1(x:vector;l:integer; var rmin:real; var n:integer); - а где далее определяется n ? Запутались с формальным и фактическими параметрами. Последний раз редактировалось type_Oleg; 15.12.2016 в 01:54. |
15.12.2016, 02:11 | #5 |
Регистрация: 15.12.2016
Сообщений: 6
|
Код:
Код:
|
15.12.2016, 02:40 | #6 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
Вот, добавьте второй массив, и все:
Код:
|
15.12.2016, 03:03 | #7 |
Регистрация: 15.12.2016
Сообщений: 6
|
Спасибо большое!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти наименьшие элементы в каждой строке матрицы и номер максимального из них | fort-_-minor | Общие вопросы C/C++ | 3 | 22.05.2013 15:44 |
Найти количество членов последовательности b1,b2..bn, которые имеют четные порядковые номера и являются нечетными числами (Паскаль | Vetal_1715 | Помощь студентам | 3 | 23.05.2012 13:20 |
Для матрицы и массива (заданы номера столбцов) найти минимальные элементы, поместить в массив, найти сред. ариф.(Delphi) | nucweapon | Помощь студентам | 5 | 26.10.2011 09:37 |
Для каждой строки напечатать номера столбцов, содержащих положительные элементы | wlll | Помощь студентам | 3 | 24.11.2010 18:39 |