Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Сортировка массиа прямым выбором
{Сортировка массива прямым выбором} const n = 30000; var a : array [1..n] of integer; var i, j, temp, min_index : integer; begin temp := 0; randomize; for i := 1 to n do begin a[i] := random(20); // write(a[i]:3); end; writeln('массив сформирован'); for i := 1 to n-1 do begin min_index := i; for j := i + 1 to n do if a[j] < a[min_index] then min_index := j; temp := a[i]; a[i] := a[min_index]; a[min_index] := temp; end; // for i := 1 to n do // write(a[i]:3); writeln('сортировка завершена'); end.
run
|
edit
|
history
|
help
0
zad27-notoptimal
2-3-4-digit
Сумма пар чисел кратных и некратных 11
Project Euler 17 : Number letter count (1000)
practica 3 ejercicio 2
SmallQuest
Project Euler 18 - Maximum path sum
practica 6 ejercicio 2
t moche
Perkalian digit