Предмет: Информатика, автор: anonym5618

Напишите программу, которая заполняет массив из N = 10 элементов случайными числами в диапазоне [0,20] и сортирует его в порядке возрастания. На каждом шаге цикла выполняется поиск максимального (а не минимального!) элемента. Пример:
Массив: 5 16 2 13 3 14 18 13 16 9 Сортировка: 2 3 5 9 13 13 14 16 16 18
НА ПАЙТОНЕ!!! ​

Ответы

Автор ответа: lemon4ik251
0

Ответ:

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.


anonym5618: Это разве не паскаль?
lemon4ik251: нет
anonym5618: ок, спасибо)
Похожие вопросы