Напишите программу, которая отсортирует одномерный массив из 10 элементов любым способо В Паскаль Напишите программу, которая отсортирует одномерный массив из 10 элементов любым способом
Пример программы на Pascal для сортировки массива из 10 элементов методом сортировки пузырьком:
program BubbleSort va arr: array[1..10] of integer i, j, temp: integer begi // Ввод массива из 10 элементо writeln('Введите 10 элементов массива:') for i := 1 to 10 d readln(arr[i]) // Сортировка массива методом пузырьк for i := 1 to 9 d for j := 1 to 10 - i d if arr[j] > arr[j + 1] the begi temp := arr[j] arr[j] := arr[j + 1] arr[j + 1] := temp end // Вывод отсортированного массив writeln('Отсортированный массив:') for i := 1 to 10 d write(arr[i], ' ') readln end.
Этот код сначала запрашивает у пользователя ввод 10 элементов массива, затем сортирует его методом пузырька и выводит отсортированный массив на экран.
Пример программы на Pascal для сортировки массива из 10 элементов методом сортировки пузырьком:
program BubbleSortva
arr: array[1..10] of integer
i, j, temp: integer
begi
// Ввод массива из 10 элементо
writeln('Введите 10 элементов массива:')
for i := 1 to 10 d
readln(arr[i])
// Сортировка массива методом пузырьк
for i := 1 to 9 d
for j := 1 to 10 - i d
if arr[j] > arr[j + 1] the
begi
temp := arr[j]
arr[j] := arr[j + 1]
arr[j + 1] := temp
end
// Вывод отсортированного массив
writeln('Отсортированный массив:')
for i := 1 to 10 d
write(arr[i], ' ')
readln
end.
Этот код сначала запрашивает у пользователя ввод 10 элементов массива, затем сортирует его методом пузырька и выводит отсортированный массив на экран.