Найти минимальный элемент массива и его индекса (в паскале)

Найти минимальный элемент массива и его индекса (в паскале)
Гость
Ответ(ы) на вопрос:
Гость
program exs; var a: array [1..30] of integer; i, min, indMin : integer; begin min:=40; for i:= 1 to 30 do a[i]:=random(30); for i:= 1 to 30 do begin if a[i] < min then begin min:=a[i]; indMin:=i; end; end; write(a[i], ' ', indMin); end.
Гость
int n; // n - количество элементов в массиве int a[100]; // a - массив целых чисел, максимальный размер 100 элементов cin >> n; for (int i = 0; i < n; i++) // ввод массива cin >> a[i]; int m = a[0]; for (int i = 0; i < n; i++) if (a[i] < m) m = a[i]; cout << m;
Не нашли ответ?
Ответить на вопрос
Похожие вопросы