Имеется массив А(1.h) Найти элемент массива с наименьшим значением

Question

Имеется массив А(1.h) Найти элемент массива с наименьшим значением

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('h='),-99,99); a.Println;
  var i:=a.IndexMin;
  Writeln('Минимальный элемент с номером ',i+1,' равен ',a[i])
end.

Пример
h= 18
6 73 -69 -85 37 95 -16 58 -60 -91 59 -13 97 -30 -29 93 -23 -90
Минимальный элемент с номером 10 равен -91

Comments

Спасибо

Answer 2

12345678910111213141516171819202122232425262728293031#include #include  using namespace std; const int N = 10; int main() {int mass[N], max, min; cout << "Элементы: |";for(int r = 0; r<N; r++){ mass[r] = rand()%99; cout << mass[r] << "|";}cout << endl; max = mass[0];min = mass[0];for(int r = 1; r<N; r++){ if(max < mass[r]) max = mass[r]; if(min > mass[r]) min = mass[r];}cout << "Min: " << min << endl;cout << "Max: " << max << endl; return 0;<span>}