Как отсортировать массив, состоящий только из нулей и единиц? - C#

Узнай цену своей работы

Формулировка задачи:

Здорова, братья. Есть простая как камень задача. Дан массив состоящий только из 1 и 0. Нужно его сортировать без создания нового массива. Офк тупо qsort'ом или пузырьком подобную задачу решать - раз плюнуть, нон как её решить рационально? Подкиньте идею норм алгоритма, напишу сам офк.

Решение задачи: «Как отсортировать массив, состоящий только из нулей и единиц?»

textual
Листинг программы
Program laba;
Uses crt;
Const n = 20;
Var
A : array [1..n] of integer;
i, d0, d1 : integer;
 
Procedure Vvod;
Begin
for i:=1 to n do A[i]:=Random(2);
End;
 
Procedure Print;
Begin
For i:=1 to n do write(A[i],' | ');
WriteLn;
End;
 
Function Chet(m:byte) : integer;
Var k : integer;
Begin
k:=0;
For i:=1 to n do
  if A[i] = m then inc(k);
WriteLn('kol-Bo ',m,' = ',k);
Chet:=k;
End;
 
Procedure St(b,e,c : byte);
Begin
For i:=b to e do A[i]:=c;
End;
 
BEGIN
clrscr;
Randomize;
  WriteLn('Massiv ');
    Vvod;
    Print;
      d0:=Chet(0);
      d1:=Chet(1);
    St(1,d0,0);
    St(n-d1+1,n,1);
  WriteLn('Massiv otcoptipoBaH ');
    Print;
Readln;
End.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 3.818 из 5
Похожие ответы