В одномерном массиве из 10 элементов определить местоположение минимального и максимального элементов?

Леранаумова 4 дек. 2020 г., 15:10:50

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

Const n = 10 ;

var a : array[1.

N] of integer ; mn, mx : integer ; i, k1, k2 : byte ;

begin mn : = maxint ; mx : = - maxint ; writeln ('Введите ', n, ' чисел : ') ; for i : = 1 to n do begin ; read (a[i]) ; if a[i]< ; mn then begin mn : = a[i] ; k1 : = i end ; if a[i]> ; mx then begin mx : = a[i] ; k2 : = i end ; end ; for i : = 1 to n do if (i> ; min(k1, k2)) and (i< ; max(k1, k2)) then a[i] : = 0 ; writeln ; writeln ('Местоположение минимального элемента : ', min(k1, k2)) ; writeln ('Местоположение максимального элемента : ', max(k1, k2)) ; writeln ; print (a) ;

end.

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Пример :

Введите 10 чисел : 5 2 9 4 6 8 2 1 3 7

Местоположение минимального элемента : 3

Местоположение максимального элемента : 8

5 2 9 0 0 0 0 1 3 7.

Alesya0501 19 апр. 2020 г., 23:12:06 | 10 - 11 классы

Сформируйте одномерный массив из 5 элементов (значения элементов укажт пользователь с клавиатуры)?

Сформируйте одномерный массив из 5 элементов (значения элементов укажт пользователь с клавиатуры).

Обнулите значения всех элементов с нечетными индексами.

Выведите значения одномерного массива в строку через пробел.

Furmanov76 25 июл. 2020 г., 23:57:32 | 5 - 9 классы

Помогите пожалуйста?

Помогите пожалуйста.

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

Определить минимальный элемент этого массива.

Некит2004 13 мар. 2020 г., 18:31:07 | 10 - 11 классы

Задан одномерный массив А(N) (N< ; = 60)?

Задан одномерный массив А(N) (N< ; = 60).

На место минимального элемента массива записать сумму последних К элементов массива.

Если А[1]> ; = 0, то умножить все элементы этого массива на квадрат минимального элемента данного вектора, а если А[1]< ; 0, то умножить все элементы на квадрат максимального элемента вектора.

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

Значение К вводится пользователем.

Sofya2003 28 июн. 2020 г., 17:46:18 | 10 - 11 классы

Ввести одномерный массив A, вывести его?

Ввести одномерный массив A, вывести его.

Переставить в обратном порядке все элементы между максимальным и предпоследним отрицательным элементом.

Помогите, не могу найти предпоследний элемент в массиве, и как их переставить?

Hatashaprudhik 4 авг. 2020 г., 01:37:25 | 10 - 11 классы

Дан целочисленный одномерный массив из n - элементов?

Дан целочисленный одномерный массив из n - элементов.

Вывести на экран четные элементы стоящие на нечетных массивов через паскаль.

Julia8282 3 дек. 2020 г., 11:36:00 | 5 - 9 классы

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

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

Найти максимальный из нечетных элементов массива.

Maneckoba0sha 21 апр. 2020 г., 16:28:40 | 10 - 11 классы

1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива 2) ввести с клавиатуры массив из n элементов вывести на экран максимальный?

1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива 2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент.

Diana98n 10 июн. 2020 г., 21:33:13 | 10 - 11 классы

В одномерном массиве А(10) найти максимальный элемент, вывести его значение и индекс?

В одномерном массиве А(10) найти максимальный элемент, вывести его значение и индекс.

Заменить все четные элементы значением максимального элемента.

Полученный массив вывести на экран.

Angelina2016a 26 авг. 2020 г., 04:14:27 | 10 - 11 классы

В одномерном массиве найти максимальный элемент заменить на 0 , и вывести массив на экран?

В одномерном массиве найти максимальный элемент заменить на 0 , и вывести массив на экран.

На паскале.

DeadGirl5 6 сент. 2020 г., 01:59:41 | 10 - 11 классы

Turbo Pascal * * * * (Дан одномерный числовой массив?

Turbo Pascal * * * * (Дан одномерный числовой массив.

Определить произведение элементов массива, расположенных между максимальным и «центральным» элементами массива (предполагается, что число элементов – нечетное и максимальный единственный).