Вопрос № 80438: Задача - Задан массив C(M). Определить минимальный элемент массива и его номер. Ci<0, N≤ 40
смотрите, что получилось..вернее что не получилось
uses crt;
const
len=40;
var
mas: array[1.. len] of integer;
min, ...
Вопрос № 80.438
Задача - Задан массив C(M). Определить минимальный элемент массива и его номер. Ci<0, N≤ 40
смотрите, что получилось..вернее что не получилось
uses crt;
const
len=40;
var
mas: array[1.. len] of integer;
min, n, i: integer;
begin
clrscr;
randomize;
for i:=1 to len do
begin
if mas[i]<min then min:=mas[i];
n:=i;
end;
writeln (n, ' ', mas[i]);
end.
на экран выводит не мин элемент а последний..40вой..поможете сделать правильно? + обратите внимание в задании сказано что элементы массива должны быть отрицательны? а как это указать?
Отправлен: 31.03.2007, 08:46
Вопрос задал: Mayra (статус: Посетитель)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 15)
Отвечает: Ерёмин Андрей
Здравствуйте, Mayra!
1) Не вижу кода заполнения массива числами. Думаю, он там есть, просто вы не стали приводить его в тексте вопроса.
2) Ошибка поиска минимального элемента состоит в том, что вы не указали начальное значение переменное min, а оно не определено. Поэтому перед циклом логично принять за минимальный элемент первый элемент массива: min:=mas[i];
3) Где именно указать, что элементы отрицательны? Если при поиске минимального - то в цикле: if (mas[i] < min) and (mas[i] < 0) then ...
Если при заполнении, то так: for i:=1 to len do
mas[i]:=Random(20)-20;
В массив попадут числа из диапазона -20..0.
Желаю удачи!
--------- Нет правила без исключений. Правило без исключений - исключение из правил.
Отвечает: Яна
Здравствуйте, Mayra!
Посмотрите строку, в которой вы выводите результат. Что там выводится? mas[i], т.е. i-й элемент массива. i после выполнения цикла равно 40. Вам нужно не это выводить, Вам нужно выводить значение переменной min.
Кроме того если в переменной n Вы пытаетесь сохранить индекс минимального элемента, то Вам нужно это делать внутри условного оператора, т.е. вставить после then begin end, и внутри последнего присваивать n:=i.
Ответ отправила: Яна (статус: Практикант)
Ответ отправлен: 31.03.2007, 09:28
Отвечает: Gh0stik
Здравствуйте, Mayra!
Чтобы прекратить гадания привожу код с коментариями :).
см. приложение
Good Luck!!!
Приложение:
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессионал) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 31.03.2007, 10:01 Оценка за ответ: 5 Комментарий оценки: спасибо) шаз проверю)
