Напишите программу, которая заполняет массив из N = 10 элементов случайными числами в диапазоне [0,20] и сортирует его в порядке возрастания. На каждом шаге цикла выполняется поиск максимального (а не минимального!) элемента. Пример:
Массив: 5 16 2 13 3 14 18 13 16 9 Сортировка: 2 3 5 9 13 13 14 16 16 18
НА ПАЙТОНЕ!!!
Массив: 5 16 2 13 3 14 18 13 16 9 Сортировка: 2 3 5 9 13 13 14 16 16 18
НА ПАЙТОНЕ!!!
Answers & Comments
Verified answer
Ответ:
const
n = 10;
x = 1;
y = 20;
var
arr: array[1..n] of integer;
tmp: integer;
begin
randomize;
write('Массив: ');
for var m := 1 to n do
begin
arr[m] := random(x, y);
write(arr[m], ' ');
end;
for var i := 1 to n do
begin
for var j := 1 to n - 1 do
begin
if (arr[j] > arr[j + 1]) then
begin
tmp := arr[j];
arr[j] := arr[j + 1];
arr[j + 1] := tmp;
end;
end;
end;
writeln();
write('После сортировки: ');
for var i := 1 to n do
write(arr[i], ' ');
end.