Turbo pascal или pascal abc. сортировать отрицательные элементы массива с прямого выбора.

const n=10;

var i,j,v: integer;

a: array [1..n]of integer;

begin

write ('       исходный массив: ');

for i: =1 to n do begin

a[i]: =random(21)-10;

write(a[i]: 4);

end;

for i: =1 to n-1 do

for j: =i+1 to n do

if (a[i]< 0) and (a[j]< 0) then

if a[i] < a[j] then

begin

v: =a[i];

a[i]: =a[j];

a[j]: =v;

end;

writeln;

write ('преобразованный массив: ');

for i: =1 to n do

write(a[i]: 4);

end.

ответ:

ну обычно, это:  

1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"  

2. строка меню - строка, через которую программой  

3. панель инструментов - панель быстрого доступа к элементам программой.  

4. рабочая область, в которой работает пользователь.

5. строка состояния - отображает текущий процесс или состояние.ну обычно, это:  

1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"  

2. строка меню - строка, через которую программой  

3. панель инструментов - панель быстрого доступа к элементам программой  

4. рабочая область, в которой работает пользователь .

5. строка состояния - отображает текущий процесс или состояние.

объяснение: