Вопрос по информатике:
Дан одномерный массив А размерности N.Поменять местами его минимальный и максимальный значения элементов.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 22.04.2018 01:25
- Информатика
- remove_red_eye 18159
- thumb_up 35
Ответы и объяснения 1
Dim i As Integer
Dim min As Integer
Dim max As Integer
Dim N As Integer
N = CInt(InputBox("Введите N"))
Dim A(N) As Integer
min = 0
max = 0
For i = 0 To N
If A(i) < A(min) Then min = i
If A(i) < A(max) Then max = i
Next
i = A(min)
A(min) = A(max)
A(max) = i
- 23.04.2018 03:44
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.