profile
Опубликовано 5 лет назад по предмету Информатика от azov3

В одномерном массиве посчитать произведение номеров максимального и минимального элементов среди положительных чисел. Массив должен содержать не менее 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
Самые новые вопросы