Ввести одномерный массив A, в котором число элементов кратно трём, вывести его. Разбить массив на три равные части, каждую из которых отсортировать по возрастанию.
const n=10;Var a:array[1..n] of integer;i,k,j:integer;BeginRandomize; For i:=1 to n do Begin A[i]:=Random(10); Write(a[i],); end; Writeln; For i:=1 to n do Begin If a[i] mod 3=0 then Write(a[i],); end; for i:=1 to n-1 do for j:=1 to n-i do begin if (a[j] > a[j+1]) then begin k:= a[j]; a[j] := a[j+1]; a[j+1] := k; end; end; writeln; for i:=1 to n do write(a[i],); readln; end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ввести одномерный массив A, в котором число элементов кратно трём, вывести его. Разбить массив на три равные части, каждую из которых отсортировать по возрастанию.» от пользователя Егор Лопухов в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!