Отсортировать массив - Pascal

  1. помогите. Линейный целочисленный массив размером N заполнен только нулями и единицами в произвольном порядке. Вам следует переместить элементы так, чтобы в начале массива были нули, а затем единицы. Формат ввода В первой строке входного файла input.txt записано одно число N (N ≤ 1000). Во второй строке записано N нулей и единиц через пробел. Формат вывода В выходном файле output.txt в единственной строку вывести новый массив в котором вначале расположены все нули, а затем единицы

textual

Код:

var i, n, z, t: integer;
begin
  //assign(input, 'input.txt');
  //reset(input);
  z := 0;
  readln(n);
  for i := 1 to n do
    begin
      read(t);
      if t = 0 then inc(z)
    end;
  //close(input);
  //assign(output, 'output.txt');
  //rewrite(output);
  for i := 1 to z do write(0:2);
  for i := z + 1 to n do write(1:2)//;
  //close(output)
end.

Похожие ответы
  1. Отсортировать массив x с n элементов в порядке убывания и найти разницу первого и последнего элементов массива.

  1. В текстовом файле в табличном виде расположен массив целых чисел 5*5. Отсортировать каждую строку массива по убыванию и дописать отсортированный массив файл.

  1. Дан файл, в котором в каждой строке записаны элементы линейных массивов различной длины. Отсортировать каждый массив по убыванию методом подсчета. Отсортированные массивы записать в тот же файл.

  1. Напишите программу, которая сортирует массив и выводит все элементы массива, которые встречаются ровно K раз. Входные данные Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива. Гарантируется, что 0 < N ≤ 10000 . В третьей строке записано натуральное число K . Выходные данные Программа должна вывести все элементы массива, которые встречаются ровно K раз, в порядке возрастания, разделив их пробелами. Если таких элементов нет, программа должна вывести число 0. Примеры входные данные 6 1 2 1 2 1 3 2 выходные данные 2

  1. Здравствуйте, помогите пожалуйста с решением такой задачи, условие короткое: Отсортировать отрицательные элементы массива с помощью простого выбора.

  1. Упорядочить по возрастанию массив,содержащий 7 вещественных чисел. ВВод/вывод данных должен осуществляться посредством процедур ввода/вывода.Упорядоченный массив занести в файл.

  1. Дан текстовый файл input.txt, содержащий действительные числа (количество чисел в файле не превышает 1000). Создать массив, содержащий компоненты этого файла. Отсортируйте все числа по возрастанию. Записать измененный массив в файл output.txt.

  1. Требуется отсортировать массив по неубыванию методом "выбор максимума". ВХОДНЫЕ ДАННЫЕ В первой строке вводится одно натуральное число, не превосходящее 1000 — размер массива. Во второй строке задаются N чисел — элементы массива (целые числа, не превосходящие по модулю 1000). ВЫХОДНЫЕ ДАННЫЕ Вывести получившийся массив. ПРИМЕРЫ ВВОД ВЫВОД 2 3 1 1 3

  1. В файле input.txt записаны числа (в столбик), известно, что их не более 100. Отсортировать на ДИСКЕ массив по возрастанию ПЕРВОЙ цифры

  1. Если можно блок-схему и программку. Очень надо плиз, буду очень благодарен.


Нашли ошибку?
Развитие проекта
Яндекс.Метрика