Question

помогите с заданием. "упорядочьте одномерный массив по возрастанию" нужно написать код программы в паскаль. желательно с объяснением! спасибо заранее

Answer 1

Ответ будет ниже,дабы читаемость кода повысить.

Answer 2

program masiv;
const N=10;
var mas:array [1..10] of integer;
i,j,r,o:integer;
begin
for o:=1 to N do
mas[o]:=Random(30)+30;
for i:=1 to N-1 do
for j:=1 to N-i do
if (mas[j]>mas[j+1]) then
begin
r:=mas[j+1];
mas[j+1]:=mas[j];
mas[j]:=r;
end;
Writeln(mas)
end.

Answer 3

Если есть вопросы,то напиши.Или я могу видео урок скинуть на эту тему

Answer 4

Спасибо большое! А можешь обьяснить почему нужен random 30? И сможешь каждую сточку постепенно обьяснить? Буду очень благодарна!!!