Расположить в массиве сначала все отрицательные элементы и нули, потом - положительные (Pascal -> C++)

@Эдя · Регистрация: 31.01.2017

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста, нужно перевести программу с pascal на С++.

Есть два вида кода:

Pascal

const n=10;
var
  a,b:array[1..n] of integer;
  i,j:integer;
begin
  write('введите ',n,' элементов в строку:');
  for i:=1 to n do read(a[i]);
  for i:=1 to n do 
    if a[i]<=0 then begin
       j:=j+1;
       b[j]:=a[i];
     end;
  for i:=1 to n do 
    if a[i]>0 then begin
       j:=j+1;
       b[j]:=a[i];
     end;
 writeln('Первоначальный массив:',a);
 writeln('Полученный массив:',b);
end.

Pascal

const n=10;
var
  a,b:array of integer;
begin
  write('введите ',n,' элементов в строку:');
  a:=ReadArrInteger(n);
  b:=a.Where(i->i<=0).ToArray+a.Where(i->i>0).ToArray();
 writeln('Первоначальный массив:',a);
 writeln('Полученный массив:',b);
end.

Исходное задание выглядит так:
Вести массив, состоящий из N элементов целого типа. Сформулировать новый, расположив сначала все отрицательные элементы и нули, после чего - положительные, сохраняя порядок их следования.

@afront · 31.01.2017, 18:46

C++

#include <iostream>
#include <ctime>
using namespace std;
 
int main()
{
    int n = 20;
    srand(time(0));
    int *a =new int[n], tmp;
    for (int i = 0; i < n; i++)
    {
        a[i] = rand() % 12 - 6;
        cout << a[i] << " ";
    }
    for (int i = 0; i < n; i++)
    {
        if (a[i] <= 0)
        {
            for (int j = 0; j < i; j++)
            {
                if (a[j] > 0)
                {
                    tmp = a[i];
                    a[i] = a[j];
                    a[j] = tmp;
                }
            }
        }
    }
    cout << endl;
    for (int i = 0; i < n; i++)
    {
        cout << a[i] << " ";
    }
    cout << endl;
    system("pause");
    return 0;
}

Новые блоги и статьи
Элементы алгоритмизации hw_wired 28.01.2025 Основы алгоритмизации В современном мире алгоритмы играют фундаментальную роль в развитии информационных технологий и программирования. Понимание основ алгоритмизации является ключевым элементом в. . .	Человек и информация hw_wired 28.01.2025 Введение: роль информации в познании мира В современном мире информация играет фундаментальную роль в процессе познания окружающей действительности. Она представляет собой совокупность сведений об. . .	Компьютер и информация hw_wired 28.01.2025 Эволюция вычислительных машин История развития вычислительной техники начинается задолго до появления первых электронных устройств. Человечество всегда стремилось упростить процесс вычислений и. . .	Информационные технологии hw_wired 28.01.2025 Введение в современные технологии работы с информацией В современном мире информационные технологии стали неотъемлемой частью практически всех сфер человеческой деятельности. Они существенно. . .	Информация вокруг нас hw_wired 28.01.2025 Основные понятия информации В современном мире понятие информации является фундаментальным и охватывает практически все сферы человеческой деятельности. Информация представляет собой совокупность. . .	Компьютер для начинающих hw_wired 28.01.2025 Введение в мир компьютерных технологий В современном мире информация стала одним из важнейших ресурсов человечества, определяющим развитие общества и технологий. Наша жизнь неразрывно связана с. . .
[golang] 189. Rotate Array alhaos 28.01.2025 Повороты рукоятки, целочисленный слайс нужно сдвинуть на целое положительное число. Мне очень нравится решение на GO / / https:/ / leetcode. com/ studyplan/ top-interview-150/ package topInterview . . .	КуМир: решение задач на матрицы bytestream 28.01.2025 КуМир представляет собой среду для обучения программированию, которая включает в себя мощные инструменты для работы с матрицами. Матрица в программировании - это двумерный массив, состоящий из. . .	КуМир: решение задач на строки bytestream 28.01.2025 В системе программирования КуМир работа со строковыми данными является одним из важнейших аспектов создания программ. Строки представляют собой последовательности символов, заключенные в кавычки,. . .	КуМир: решение геометрических задач bytestream 28.01.2025 Программирование геометрических задач в среде КуМир становится всё более актуальным в обучении школьников и студентов. КуМир — это разработанная в России обучающая программная среда, предназначенная. . .	КуМир, исполнитель Водолей: Задачи и решения bytestream 28.01.2025 КуМир — это образовательная среда для обучения программированию. Она предлагает пользователям разнообразные инструменты для разработки и отладки программ, что особенно ценно для студентов и. . .	КуМир, исполнитель Чертежник: Решение задач bytestream 28.01.2025 КуМир (Комплект Учебных МИРов) представляет собой образовательную среду для обучения основам программирования и алгоритмизации. Исполнитель Чертежник работает на координатной плоскости, где может. . .

	31.01.2017, 18:46

Расположить в массиве сначала все отрицательные элементы и нули, потом - положительные (Pascal -> C++)

Решение