В одномерном массиве посчитать творенье номеров наибольшего и малого частей

В одномерном массиве посчитать творение номеров наибольшего и малого частей среди положительных чисел. Массив должен содержать не наименее 20 чисел которые генерируются нечаянно

Задать свой вопрос
1 ответ
PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  Writeln('Творение равно ',(a.IndexMin+1)*(a.IndexMax+1))
end.

Пример
n= 23
-7 30 27 -1 38 35 -7 -45 -29 39 -32 -4 -1 -15 15 13 19 21 26 14 -22 -15 15
Творение одинаково 80
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт