Задание 4 Параграф 22 ГДЗ Семакин 9 класс (Информатика)
4. Разработайте программу на Паскале. Имеется массив целых чисел (положительных и отрицательных). Необходимо отсортировать массив в порядке возрастания значений его элементов.
Ниже вариант решения задания из учебника Семакин, Залогова 9 класс, Просвещение:
4. Разработайте программу на Паскале. Имеется массив целых чисел (положительных и отрицательных). Необходимо отсортировать массив в порядке возрастания значений его элементов.
program sort;
const
n = 10;
var
a: array [1..n] of integer;
i, j, c, k: integer;
begin
writeln(task Формирование и вывод исходного массиваtask);
randomize;
for i := 1 to n do
begin
a[i] := random(100) - 50;
write(a[i], task task);
end;
writeln;
for i := 1 to n - 1 do
begin
k := i;
for j := i + 1 to n do
if a[j]
c := a[i]; a[i] := a[k]; a[k] := c;
end;
for i := 1 to n do
write(a[i], task task);
end.