1. Заполнить массив из 10 элементов целыми случайными числами, лежащими в диапазоне от 0...

Question

1. Заполнить массив из 10 элементов целыми случайными числами, лежащими в диапазоне от 0 до +30. 2. В этом массиве все числа, большие 15 разделить нацело на 3. 3. Найти сумму элементов для этого массива. 4. Найти номер (индекс) минимального элемента массива (если таких элементов несколько, то первого из них). ​

Answer 1

Ответ:

PascalABC.NET 3.6.2

begin

 var a := ArrRandom(10, 0, 30); //Массив из 10 элементов в заданном диапазоне

 a.Transform(p -> p > 15 ? p div 3 : p); //Все элементы больше 15 делим нацело на 3

 a.Sum.Println; //Находим сумму

 Print(a.IndexMax.Println); //Находим индекс первого максимума

end.

Объяснение:

Answer 2

Ответ:

#include

using namespace std;

long long a,b,c,A,B,count1=0,d,F[17],sum=0,min1=10000,minI;

int main()

{

   for(int i=1;i

       F[i]=rand()%30;

       if(F[i]>15){

           F[i]=F[i]/3;

       }

       if(F[i]

           min1=F[i];

           minI=i;

       }

       sum+=F[i];

       cout

   }

   cout

   cout

   cout

   return 0;

}

11 5 4 10 9 4 6 6 7 14

Suma: 76

minIndex: 3

Объяснение:

Тут и так всё понятно