Задачи Заполнение массива произвольными элементами из интервала

Задачи

Заполнение массива произвольными элементами из интервала (-100, 100) RANDOMIZE TIMER INPUT “Количество элементов”; K DIM A(K) FOR I=1 TO K A(I)=(-1)^INT(RND(1)*2)*INT(RND(1)*100) PRINT “A(”; I; “)=”; A(I) NEXT I

Задачи 1. Составить программу вычисления в массиве В(12) суммы индексов отрицательных элементов. 2. Составить программу вычисления в массиве А(N) количество положительных элементов и их произведения. 3. Составить программу вычисления в массиве B(N) номер максимального элемента.

Задачи 4. Составить программу вычисления суммы элементов линейного массива, имеющих четные индексы, и произведение ненулевых элементов, имеющих нечетные индексы. 5. Заменить положительные элементы массива первым элементом. Подсчитать количество этих замен.

Задачи 6. Составить программу вычисления в массиве В(30) минимального элемента и подсчета количества элементов, равных минимальному. 7. Составить программу подсчета числа элементов массива, превосходящих среднее арифметическое элементов данного массива.

Задачи 8. Найти сколько элементов массива М(14) принадлежат интервалу (-2, 2). 9. Вычислить произведение ненулевых элементов линейного массива К(20) и вывести сообщение о том, положительное это значение или отрицательное.

Задачи 10. На соревнованиях по плаванию на дистанции 50 м получен массив r(k), содержащий результаты пловцов. Определить три лучших результата. Массив сформировать с помощью функции RND: • целые числа в диапазоне от 28 с до 60 с; • десятичные числа в диапазоне от 28 с до 60 с.