В паскале?

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

В паскале.

Отсортировать исходный одномерный массив по возрастанию методом поиска максимума и обмена.

Ответить на вопрос
Ответы (1)
Anastasiacrotova 2 мая 2020 г., 02:12:52

Var a : array [1.

10] of byte ; i, k, n, t, x, max : byte ; / / процедура вывода массива

procedure WriteA() ;

var i : byte ;

begin for i : = 1 to 10 do begin write(a[i], chr(32)) ; end ; writeln() ;

end ; / / основная процедура

begin

Randomize ; for i : = 1 to 10 do begin a[i] : = random(100) ; end ; WriteA() ; writeln(' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ') ; n : = 10 ; while n > ; 1 do begin for i : = n downto 1 do begin if a[i] > ; max then begin max : = a[i] ; x : = i end ; end ; t : = a[n] ; a[n] : = max ; a[x] : = t ; dec(n) ; max : = 0 ; WriteA() ; end ; writeln(' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ') ; WriteA() ;

end.

- Pascal ABC.

NET, массив из10 случайных чисел до 100 типа byte - Результат работы программы следующий :

43 77 72 39 60 99 44 65 72 58 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

43 77 72 39 60 58 44 65 72 99

43 72 72 39 60 58 44 65 77 99

43 72 65 39 60 58 44 72 77 99

43 44 65 39 60 58 72 72 77 99

43 44 58 39 60 65 72 72 77 99

43 44 58 39 60 65 72 72 77 99

43 44 39 58 60 65 72 72 77 99

43 39 44 58 60 65 72 72 77 99

39 43 44 58 60 65 72 72 77 99 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

39 43 44 58 60 65 72 72 77 99.

Sooslir 22 апр. 2020 г., 01:30:31 | 10 - 11 классы

Создайте программу в Паскале формирования исходного одномерного целочисленного массива случайным образом в файле input?

Создайте программу в Паскале формирования исходного одномерного целочисленного массива случайным образом в файле input.

Txt. Отсортированный исходный массив по возрастанию и по убыванию записывается в виде двух таблиц в файл output.

Txt.

Wwwgalaevasas 18 апр. 2020 г., 15:35:18 | 10 - 11 классы

ПАСКАЛЬ, помогите пожалуйста отсортировать по возрастанию отрицательные элементы массива?

ПАСКАЛЬ, помогите пожалуйста отсортировать по возрастанию отрицательные элементы массива.

Вывести исходный массив и измененный массив.

Можно использовать любой метод сортировки.

Массив заполнить случайными положительными и отрицательными числами.

Madinayakovlev 19 авг. 2020 г., 21:24:37 | 10 - 11 классы

Упорядочить одномерный числовой массив по возрастанию(Pascal)?

Упорядочить одномерный числовой массив по возрастанию(Pascal).

Lisickaja2002 28 янв. 2020 г., 14:51:57 | 10 - 11 классы

Дан целочисленный массив А(а1?

Дан целочисленный массив А(а1.

Аn). Отсортировать массив по убыванию, начиная с максимального элемента.

ПАСКАЛЬ.

Ivansmirnov0201 30 апр. 2020 г., 21:36:19 | 10 - 11 классы

Заполнить массив из 10 элементов случайными числами от - 10 до 5?

Заполнить массив из 10 элементов случайными числами от - 10 до 5.

Произвести сортировку методом прямого обмена по возрастанию.

(Код нужен на паскаль).

Morethanlove 4 янв. 2020 г., 04:22:56 | 10 - 11 классы

Дан целочисленный массив A(a1?

Дан целочисленный массив A(a1.

An). Отсортировать массив по возрастанию , начиная с минимального элемента.

Мая19 1 апр. 2020 г., 14:56:05 | 10 - 11 классы

Дан двумерный массив, нужно отсортировать по возрпастанию, и в другой массив(одномерный) записать эти числа?

Дан двумерный массив, нужно отсортировать по возрпастанию, и в другой массив(одномерный) записать эти числа.

Аааааа53 6 дек. 2020 г., 11:35:41 | 10 - 11 классы

1. Заполнить одномерный массив B вещественными числами из промежутка от - 20 до 5?

1. Заполнить одномерный массив B вещественными числами из промежутка от - 20 до 5.

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

Найти произведение отрицательных элементов массива.

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

Отсортировать массив по убыванию.

2. Заполнить одномерный массив А целыми числами из промежутка от - 12 до 7.

Вывести элементы массива, значения которых больше заданного числа Н и кратны числу К.

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

Отсортировать массив по возрастанию.

На паскале.

Shamanka1 20 июн. 2020 г., 19:06:06 | 10 - 11 классы

Задан массив 15 случайных чисел из отрезка (0, 50)?

Задан массив 15 случайных чисел из отрезка (0, 50).

Отсортировать данный массив по возрастанию (программа Паскаль).

SVT1508 20 дек. 2020 г., 01:12:11 | 10 - 11 классы

Используя обменную сортировку, отсортировать массив по убыванию в динамическом массиве в паскале?

Используя обменную сортировку, отсортировать массив по убыванию в динамическом массиве в паскале.

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