Программирование - процесс и искусство создания компьютерных программ и/или программного обеспечения с помощью языков программирования. Программирование сочетает в себе элементы искусства, фундаментальных наук: информатики и математики.

Обработка одномерных массивов

Задачи работы:
1. Изучить способы описания и использования массивов, алгоритмы сортировки массивов (сортировка выбором, вставками и обменная сортировка) и алгоритмы поиска элемента в неупорядоченном и упорядоченном массивах.
2. Разработать алгоритм и составить программу для решения задачи соответствующего варианта. Длину последовательности задать константой.
3. Подобрать наборы тестовых данных.


Задание:
Дана последовательность целых чисел, содержащая как положительные, так и отрицательные элементы. Упорядочить последовательность следующим образом: сначала идут отрицательные числа, упорядоченные по невозрастанию, потом положительные, упорядоченные по неубыванию

uses Сrt;

const N=10;

var {объявляем переменные }
i,j,k, temp: integer;
mas: array[1..N]of integer;

begin
clrscr; { очищаем экран }
for i:=1 to N do
begin
write('Введите элемент #',i,': ');
readln(mas[i]);
end;

for i:=2 to N do
for j:=N downto 2 do
if mas[j-1] > mas[j] then
begin
temp := mas[j];
mas[j] := mas[j-1];
mas[j-1] := temp;
end;

for i:=1 to N do
if mas[i]>=0 then
begin
k:=i;
break;
end;

for i:=2 to k-1 do
for j:= k-1 downto 2 do
if mas[j-1] < mas[j] then
begin
temp := mas[j];
mas[j] := mas[j-1];
mas[j-1] := temp;
end;

for i:=1 to N do
write(mas[i],' ');

readkey;
end.



Вы можете заказать выполнение работы по схожей или другой теме, заполнив форму заказа.
Можете посмотреть другие готовые работы

 
Меню
Главная
Услуги
Способы оплаты
Гарантии
Заказать
Готовые работы
Примеры алгоритмов
Контакты
 
 
Консультации
 
 
  ICQ 588641
 
Электронная почта
911@mathematix.ru
 
Skype
mathematix.ru
 
 
 
  © mathematix - контрольные, курсовые и дипломы по программированию Rambler's Top100