Сделать так чтобы элементы массива меньше 0 были в одной части массива, больше 0 в другой Пример: Исходный массив: 4 -3 -2 -6 7 9 -8 6 ответ: 4 6 7 9 | -6 -3 -2 -8 С++

#include <iostream>

#include <vector>

#include <algorithm>

using namespace std;

bool cmp(int a, int b)

{

return a > b ? 1 : 0;

}

int main()

{

int n;

cin >> n;

vector <int> a(n);

for(int i = 0; i < n; ++i)

 cin >> a[i];

sort(a.begin(), a.end(), cmp);

for(int i = 0; i < n; ++i)

 cout << a[i] << " ";

return 0;

}

#include <iostream>

using std::cin;

using std::cout;

int main(int argc, char const* argv[]) {

int n;

cout << "Enter size of array:\n";

cin >> n;

int *mas1 = new int[n];

int *mas2 = new int[n];

cout << "Enter elements of array:\n";

for (register int i = 0; i < n; i++) {

 cin >> mas1[i];

}

int counter = 0;

for (register int i = 0; i < n; i++) {

 if (mas1[i] < 0) {

  mas2[counter] = mas1[i];

  counter++;

 }

}

for (register int i = 0; i < n; i++) {

 if (mas1[i] == 0) {

  mas2[counter] = mas1[i];

  counter++;

 }

}

for (register int i = 0; i < n; i++) {

 if (mas1[i] > 0) {

  mas2[counter] = mas1[i];

  counter++;

 }

}

for (register int i = 0; i < n; i++) {

 cout << mas2[i] << std::endl;

}

return 0;

}

На сегодняшний день компьютеры стали очень важной частью, скажем даже инструментом, в разных сферах медицинской деятельности. С компьютерных технологий медицина стала развиваться, совершенствоваться, что обеспечило высокую точность исследований, данных и результатов работы. Сейчас в ногу с современностью старается шагать каждое учреждение, потому как это не только новые технологии, но увеличенное количество пациентов. Медицина собой представляет очень сложную науку, где даже самый профессиональный специалист может допустить ошибку, в результате чего сложно поставить диагноз. В этом случае свою роль сыграет компьютерная которая намного облегчит работу врача. Благодаря такой можно получить точный диагноз и за короткий период времени. То, что последнее слово всегда за врачом, это конечно, безусловно, но компьютер ускорить процесс принятия решения, которое здоровье, а иногда и жизнь человека. Современные медицинские заведения давно перешли от бумажной работы к компьютерной, что бы врачи могли больше уделить времени и внимания пациенту, нежели бумажной работе. Все данные по пациентам занесены в компьютер, таким образом, работа не стоит на месте, медицинские учреждения процветают, а пациенты выздоравливают. Кроме этого, компьютерные технологии врачам проводить различные медицинские обследования, вплоть до исследования внутренних органов человека. Еще компьютеры позволяют установить, на сколько сильно влияет загрязненный воздух на заболеваемость людей в том или ином районе населенного пункта. Также компьютерные технологии очень большую роль играют в медицинских исследованиях. Например, при компьютера можно изучить последствия удара для позвоночника или черепа головы человека, или всего скелета человеческого в целом, скажем, после автомобильной аварии. Компьютерные технологии также заработали себе отличную репутацию в отрасли, связанной с донорскими органами, которые необходимы пациентам для трансплантации. Сюда же можно и отнести обучение медработников, что тоже имеет большое значение в работе медицины. Это происходит в виде «игры», компьютер выступает в виде пациента, а медработник согласно выданным симптомам должен поставить диагноз и назначить курс лечения. Если же врач сделал ошибку, компьютер сразу же об этом оповестит и укажет место этой ошибки. Компьютерные технологии используются и в эпидемиологических службах, для того, чтобы составить эпидемиологическую карту, которая позволит следить за скоростью и определять направление распространения вируса. Поэтому можно смело сказать о том, что компьютерная это довольно таки необходимый инструмент в работе медработников. Говорить о том, что компьютерные технологии очень важны в медицине можно очень долго, но последнее решение всегда будет оставаться за эмоциональным компьютером – человеком.

Var a,b,c,d:integer;
begin
  writeln('Введите 4 числа через пробел'); readln(a,b,c,d);
  if (a>0)and(b>0)and(c>0)and(d>0) then writeln('Все числа положительные')
 else if ((a<0)and(b>0)and(c>0)and(d>0))or((a>0)and(b<0)and(c>0)and(d>0))or((a>0)and(b>0)(c<0))or((a>0)and(b>0)and(c>0)and(d<0)) then writeln('3 числа положительные')
  else if ((a<0)and(b<0)and(c>0)and(d>0))or((a<0)and(b>0)and(c<0)and(d>0))or((a<0)and(b>0)and(c>0)and(d>0))or((a<0)and(b>0)and(c>0)and(d<0))or((a>0)and(b<0)and(c<0)and(d>0))or((a>0)and(b<0)and(c>0)and(d<0))or((a>0)and(b>0)and(c<0)and(d<0)) then writeln('2 числа положительных');
  else if ((a>0)and(b<0)and(c<0)and(d<0))or((a<0)and(b>0)and(c<0)and(d<0))or((a<0)and(b<0)and(c>0)and(d<0))or((a<0)and(b<0)and(c<0)and(d>0)) then writeln('1 положительное число')
  else if (a<0)and(b<0)and(c<0)and(d<0) then writeln('Нет положительных чисел');
  readln
end.