Динамический массив - Pascal

  1. Составит программу, в которой вводится размер массива (одномерный). Выделить память, отсортировать элементы массива по убыванию. Освободить память. Сделайте пожалуйста через динамический массив, заранее спасибо


textual

Код к задаче: «Динамический массив - Pascal»

var
  a: array of Integer;
  n, i: Integer;
begin
  Randomize;
  Write('N: '); Read(n);
  SetLength(a,n);
  for i:=0 to n-1 do a[i]:=Random(100);
  Write('A ='); for i:=0 to n-1 do Write(' ',a[i]); WriteLn;
  { отсортировать любимым способом }
  Write('A''='); for i:=0 to n-1 do Write(' ',a[i]); WriteLn;
  SetLength(a,0); { не обязательно }
end.

СДЕЛАЙТЕ РЕПОСТ

11   голосов, оценка 3.909 из 5



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

  1. Помогите написать программу: В массиве из 10 целых чисел подсчитать сумму элементов более чем в 2 рах превышающих минимальный.

  1. Здравствуйте,помогите пожалуйста написать программу.Напишите программу, которая выполняет реверс массива целых чисел, то есть переставляет все элементы в обратном порядке. Размер массива заранее неизвестен. Исходные данные записаны в файл input.txt , обработанный массив нужно вывести в файл output.txt . Входные данные Первая строка входного файла input.txt содержит размер массива. Во второй строке записаны все элементы массива, разделённые пробелами. Выходные данные Программа должна вывести в файл output.txt все элементы «перевёрнутого» массива в одной строке, разделив их пробелами. Примеры входные данные 5 5 1 4 2 3 выходные данные 3 2 4 1 5

  1. дан массив. после каждого элемента вставте такой же.

  1. 2. Сформировать двумерный динамический массив. Добавить в него строку с заданным номером;

  1. Помогите решить задание, это не выполнимое задание. Вариант 2 1. Поменять местами строки 5 и 6. Вывести получившийся массив на экран. 2. Поменять местами столбцы 3 и 4. Вывести получившийся массив на экран. 3. Изменить порядок элементов в строке 8 на обратный. Вывести по-лучившийся массив на экран. 4. Изменить порядок элементов в столбце 1 на обратный. Вывести по-лучившийся массив на экран. 5. Осуществить перестановку соседних элементов в 2ом столбце. Вы-вести получившийся массив на экран. 6. Обменять половины строки 3 местами. Вывести получившийся мас-сив на экран. 7. Транспонировать матрицу: 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 3 3 3 3 3 3 3 3 4 4 4 4 4 4 4 4 5 5 5 5 5 5 5 5 6 6 6 6 6 6 6 6 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8

  1. В произвольно заданном одномерном массиве определить два элемента с минимальными значениями и уменьшить исходный массив на элементы, расположенные между найденными значениями.

  1. Нужно написать программу, которая оптимизированно осуществит переход от шестимерного массива к трехмерному, желательно в паскале. Прошу помощи, заранее благодарен!!!