В массиве из 8 целых чисел переставить максимальный элемент на первое место, а элементы с первого до максимального сдвинуть на одну позицию вправо?

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

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

БЕЙСИК!

Ответить на вопрос
Ответы (1)
Andreiponomarev 15 янв. 2021 г., 00:18:15

Microsoft QBasic 1.

0

DIM n AS INTEGER

CLS

INPUT "n = ", n

REDIM a(1 TO n) AS INTEGER

RANDOMIZE TIMER

imax = 1

FOR i = 1 TO n a(i) = INT(30 * RND) IF a(i) > ; a(imax) THEN imax = i PRINT a(i) ;

NEXT

PRINT

t = a(imax)

FOR i = imax - 1 TO 1 STEP - 1 a(i + 1) = a(i)

NEXT

a(1) = t

FOR i = 1 TO n PRINT a(i) ;

NEXT

Пример

n = 15

5 16 10 18 11 12 10 26 27 22 20 5 16 18 4

27 5 16 10 18 11 12 10 26 22 20 5 16 18 4.

Egordunaev 1 июн. 2021 г., 10:56:55 | 10 - 11 классы

Написать программу в турбо паскаледано целое число N и набор из N целых чисел Найти количество элементов содеражащихся между первым и последним максимальным элементом Если в наборе имеется единственны?

Написать программу в турбо паскале

дано целое число N и набор из N целых чисел Найти количество элементов содеражащихся между первым и последним максимальным элементом Если в наборе имеется единственный максимальный элемент, то вывести на экран 0.

Sp1997 21 мая 2021 г., 06:45:10 | 10 - 11 классы

Заменить все положительные элементы массива на максимальный элемент массива ?

Заменить все положительные элементы массива на максимальный элемент массива .

Напишите программу в ПАСКАЛЬ.

Annaogneva2002 23 апр. 2021 г., 11:04:26 | 1 - 4 классы

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

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

На языке Паскаль!

Помогите.

Malkova1993 11 мар. 2021 г., 09:16:41 | 10 - 11 классы

В массиве из 8 целых чисел переставить максимальный элемент на первое место, а элементы с первого до максимального сдвинуть на одну позицию вправо?

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

Написать программу для VBA MS Excel.

Данные могут генерироваться случайным образом, главное, чтобы это было 8 целых чисел.

Вывод осуществляется в строке (label), либо как сделаете.

Wariona 17 янв. 2021 г., 13:26:48 | 5 - 9 классы

Дан массив из десяти целых чисел?

Дан массив из десяти целых чисел.

Определите , сколько элементов этого массива имеют максимальное значение?

С подробностями пж.

Darkshaper007 15 янв. 2021 г., 16:16:03 | 5 - 9 классы

Составьте программу, которая заполняет массив а[1?

Составьте программу, которая заполняет массив а[1.

10] случайными целыми числами в диапозоне от 0 до 10, затем первый элемент меняет местами с максимальным элементом.

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

Dobriy3000 19 авг. 2021 г., 20:34:39 | 10 - 11 классы

Напишите программу, которая находит в массиве максимальный повторяющийся элемент или выводит число - 1, если ни один элемент не повторяется?

Напишите программу, которая находит в массиве максимальный повторяющийся элемент или выводит число - 1, если ни один элемент не повторяется.

Входные данные

Первая строка содержит размер массива N .

Во второй строке через пробел задаются N чисел – элементы массива.

Гарантируется, что 0 < N ≤ 10000 .

Выходные данные

Программа должна вывести максимальный повторяющийся элемент в массиве или число - 1, если ни один элемент не повторяется.

Funky0 12 окт. 2021 г., 13:44:53 | 10 - 11 классы

В однородном массиве, состаящем из N вещественных элементов, найти максимальный по модулю элемент массива?

В однородном массиве, состаящем из N вещественных элементов, найти максимальный по модулю элемент массива.

Алексей982 24 сент. 2021 г., 09:33:56 | 5 - 9 классы

Сформировать массив А из 30 случайных чисел в интервале от - 50 до 50, найти максимальный элемент массива и увеличить все элементы массива на величину максимального?

Сформировать массив А из 30 случайных чисел в интервале от - 50 до 50, найти максимальный элемент массива и увеличить все элементы массива на величину максимального.

Alizan1957 19 июл. 2021 г., 13:42:52 | 10 - 11 классы

Вычислить сумму положительных элементов массива целых чисел без учёта максимальных значений?

Вычислить сумму положительных элементов массива целых чисел без учёта максимальных значений.

В среде Delphi.

Вопрос В массиве из 8 целых чисел переставить максимальный элемент на первое место, а элементы с первого до максимального сдвинуть на одну позицию вправо?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 10 - 11 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.