С одномерным массивом, состоящим из n вещественных элементов, произвести следующие операции : 1) найти номер минимального элемента массива ; 2) вычислить сумму элементов массива, расположенных между п?

Информатика | 10 - 11 классы

С одномерным массивом, состоящим из n вещественных элементов, произвести следующие операции : 1) найти номер минимального элемента массива ; 2) вычислить сумму элементов массива, расположенных между первым и вторым отрицательными элементами ; 3) преобразовать массив таким образом, чтобы сначала располагались, все элементы, модуль которых не превышает 1, а потом – все остальные.

Примечание : Размеры массивов задаются именованными константами.

Все операции над массивами выполняются отдельными процедурами и функциями в том порядке, в котором они описаны в задании.

Элементы массивов задаются одним из двух способов : генерация случайным образом или ввод с клавиатуры.

Способ заполнения массива выбирается пользователем.

Реальную размерность массива программа должна спрашивать у пользователя (в диапазоне от единицы до значения, определяемое константой).

Ответить на вопрос
Ответы (1)
Ddregovich 16 сент. 2020 г., 08:33:30

/ / Pascal ABC.

NET 3.

1 сборка 1219

Const

nc = 10000 ;

Type

ty = array[1.

Nc] of real ;

function minind(ar : ty ; n : integer) : integer ;

Var

i, mini : integer ;

min : real ;

begin

min : = 11 ; for i : = 1 to n do if ar[i]< ; min then begin min : = ar[i] ; mini : = i ; end ;

minind : = mini ;

end ;

function sum1to2(ar : ty ; n : integer) : real ;

Var

i, t1, t2 : integer ;

r : real ;

begin

for i : = 1 to n do if ar[i]< ; 0 then begin t1 : = i ; break ; end ;

for i : = t1 + 1 to n do if ar[i]< ; 0 then begin t2 : = i ; break ; end ;

for i : = t1 + 1 to t2 - 1 do

r : = r + ar[i] ;

sum1to2 : = r ;

end ;

procedure stransort(var ar : ty ; n : integer) ;

Vari, j, nd : integer ;

begin

nd : = 0 ;

for i : = 1 to n do if abs(ar[i])< ; = 1 then begin inc(nd) ; swap(ar[i], ar[nd]) ; end ;

end ;

Var

ar : ty ;

i, n : integer ;

begin

randomize ;

readln(n) ;

writeln('Array : ') ;

for i : = 1 to n do

begin ar[i] : = random( - 3, 3) ; write(ar[i] : 4) ;

end ;

writeln ;

writeln('Index of minimum : ', minind(ar, n)) ;

writeln('Sum = ', sum1to2(ar, n)) ;

stransort(ar, n) ;

writeln('Final array : ') ;

for i : = 1 to n do

write(ar[i] : 4) ;

end.

Пример ввода :

5

Пример вывода :

Array : 3 2 1 2 1

Index of minimum : 3

Sum = 0

Final array : 1 1 3 2 2.

Марта221 11 сент. 2020 г., 01:42:13 | 10 - 11 классы

Заполнить двумерный массив случайными числами?

Заполнить двумерный массив случайными числами.

Размерность массива и диапазон генерации вводятся с клавиатуры.

Составить программу, которая вычисляет сумму всех элементов массива.

Затем организовать новый массив В, в котором заменить отрицательные элементы исходного массива на 1, а значения остальных элементов оставить без изменения.

Подсчитать количество замен.

Olegkudarbekov 12 июл. 2020 г., 05:41:52 | 5 - 9 классы

Дан одновременный массив, состоящий из 10 эллементов?

Дан одновременный массив, состоящий из 10 эллементов.

Пользователь вводит элементы массива.

Ввести массив на экран в строку.

Найти минимальный элемент массива.

Ниже приведен рекомендованный вид экрана во время выполнения программы : Вывод минимального элемента массива Ввод элементов массива Введите 1 элемент массива : 1 Введите 2 элемент массива : 2 Введите 3 элемент массива : 3 и т.

Д. до 10.

Ssv1973 23 апр. 2020 г., 13:58:22 | 10 - 11 классы

Задача 1 В одномерном массиве , состоящем из n вещественных элементов , вычислить ; 1) номер минимального элемента ; 2) сумму элементов массива ; Преобразовать массив таким образом , чтобы сначала рас?

Задача 1 В одномерном массиве , состоящем из n вещественных элементов , вычислить ; 1) номер минимального элемента ; 2) сумму элементов массива ; Преобразовать массив таким образом , чтобы сначала располагались все элементы , модуль которых не превышает 1 , а потом - все остальные .

Задача 2 В одномерном массиве , состоящем из n вещественных элементов , вычислить ; !

) минимальный по модулю элемент массива ; 2) сумму модулей элементов массива , расположенных после первого элемента , равного нулю .

Преобразовать массив таким образом , чтобы в первой его половине располагались элементы в четных позивиях , а во второй половине - элементы , стоявшие в нечетных позициях.

Zarolik 23 авг. 2020 г., 08:39:14 | 5 - 9 классы

Написать программу, позволяющую для заданного одномерного массива А из n вещественных или целых элементов реализовать обработку массива?

Написать программу, позволяющую для заданного одномерного массива А из n вещественных или целых элементов реализовать обработку массива.

Длина массива N задается пользователем как константное выражение.

Исходные данные задать вручную или с помощью генератора случайных чисел, учитывая формат элементов массива А.

Тип результата определяется из контекста.

- Вычислить количество отрицательных элементов массива ; - сумму модулей элементов массива, расположенных после максимального элемента.

Lisaweta 28 апр. 2020 г., 00:54:56 | 10 - 11 классы

В одномерном массиве, состоящем из n вещественных элементов, вычислить : 1) номер минимального элемента массива?

В одномерном массиве, состоящем из n вещественных элементов, вычислить : 1) номер минимального элемента массива.

Torigrey72 22 янв. 2020 г., 03:52:11 | 10 - 11 классы

Дана целочисленная прямоугольная матрица?

Дана целочисленная прямоугольная матрица.

Найти сумму элементов тех столбцов, которые содержат хотя бы один отрицательный элемент.

Примечание : Размеры массивов задаются именованными константами.

Значения элементов массивов вводятся с клавиатуры, генерируются случайным образом или инициализируются в программе (значения по умолчанию).

Способ задания элементов массива выбирается пользователем.

Все операции над массивами выполняются отдельными функциями.

Катюшащенок 21 нояб. 2020 г., 01:23:06 | 10 - 11 классы

Помогите написать программу В одномерном массиве, состоящем из 15 вещественных элементов (значения элементов массива задать случайными числами из интервала [ - 10 ; 10]), вычислить произведение элемен?

Помогите написать программу В одномерном массиве, состоящем из 15 вещественных элементов (значения элементов массива задать случайными числами из интервала [ - 10 ; 10]), вычислить произведение элементов массива, расположенных между максимальным и минимальным элементами.

Сформировать из этих элементов новый массив.

Prinzessulya 10 окт. 2020 г., 03:37:04 | 10 - 11 классы

Дана целочисленная прямоугольная матрица?

Дана целочисленная прямоугольная матрица.

Найти сумму элементов тех столбцов, которые содержат хотя бы один отрицательный элемент.

Примечание : Размеры массивов задаются именованными константами.

Значения элементов массивов вводятся с клавиатуры, генерируются случайным образом или инициализируются в программе (значения по умолчанию).

Способ задания элементов массива выбирается пользователем.

Все операции над массивами выполняются отдельными функциями.

Azamatova 11 янв. 2020 г., 18:17:13 | 10 - 11 классы

В одномерном массиве, состоящем из n целых случайных элементов из диапазона от - 10 до 10 вычислите : 1) среднее арифметическое отрицательных нечетных элементов массива , 2) сумму элементов массива, р?

В одномерном массиве, состоящем из n целых случайных элементов из диапазона от - 10 до 10 вычислите : 1) среднее арифметическое отрицательных нечетных элементов массива , 2) сумму элементов массива, расположенных за вторым нечетным положительным элементом.

Artem1918 1 янв. 2020 г., 05:23:47 | 10 - 11 классы

Создать два одномерных массива, состоящих из целых чисел?

Создать два одномерных массива, состоящих из целых чисел.

Элементы массива вводятся с клавиатуры.

В первом массиве найти номер первого нечетного элемента массива.

Во втором массиве найти первый четный элемент массива.

Решить на Pascal ABC (При решении задач обязательно использовать одномерные массивы и процедуры или функции работы с одномерными массивами.

).

На этой странице сайта вы найдете ответы на вопрос С одномерным массивом, состоящим из n вещественных элементов, произвести следующие операции : 1) найти номер минимального элемента массива ; 2) вычислить сумму элементов массива, расположенных между п?, относящийся к категории Информатика. Сложность вопроса соответствует базовым знаниям учеников 10 - 11 классов. Для получения дополнительной информации найдите другие вопросы, относящимися к данной тематике, с помощью поисковой системы. Или сформулируйте новый вопрос: нажмите кнопку вверху страницы, и задайте нужный запрос с помощью ключевых слов, отвечающих вашим критериям. Общайтесь с посетителями страницы, обсуждайте тему. Возможно, их ответы помогут найти нужную информацию.