Массив

[amki6]

задан масив целых чисел, пользователь вводит 2 индекса, осортировать те элементы массива которые расположенны между этими 2 индексами включительно.

[Snejnaya]

процедуры сортировки массива неоднократно излагались - поищи на 2-3-4 страницах этого раздела.
Тебе останется изменить интервалы, т.е. в циклах вместо 1 везде поставить index1, вместо n (числа элементов массива) index2

[amki6]

я не могу найти а вы можете написать более подробнее где это находиться

[Stilet]

http://yandex.ua/yandsearch?text=%D0...ammersforum.ru
Тут поищи.

[amki6]

Кроче я не смогла найти.
Program nazachet;
uses crt;
var c1,c2:real; i,b,j:integer;
massive:array[1..20] of integer;

begin
clrscr;

for i:=1 to 20 do
massive[i]:=random(200);
{ñîðòèðîâêà}
for j:=1 to 19 do
for i:=1 to (20-j) do
if massive[i+1]>massive[i]
then begin
b:=massive[i];
massive[i]:=massive[i+1];
massive[i+1]:=b;
end;

for i:=1 to 20 do writeln(massive[i]);

writeln('vvedi c1= ');
readln(c1);
writeln('vvedi c2= ');
readln(c2);
i:=1;

while massive[i]>=c1 do begin
i:=i-1;
write(' ',massive[i+1]);

while massive[i]<=c2 do begin
i:=i-1;
write(' ',massive[i+1]);

end;
end;
end.
почему он не выводит эти цифры которые длжны входить в этот интервал

[Артем8]

1.Одномерный массив
дано натуральное число n. получить сумму тех чисел вида i^3-3in^2+n, i=1,2,....,n, которые являются удвоенными нечетными. При отсутствии таких чисел искомая сумма равна нулю.

[Артем8]

Двумерный массив.
Дано натуральное число n. получить действительную матрицу по модулю a ij; i,j=1,....,n, для которой
a ij=система sin(i+j), i<j
1, i=j
arcsin(i+j)/(2i+3j), в остальных случаях

[Snejnaya]

amki6
программа бредовая, где ты ее нашла? она сначала сортирует массив, а потом зачем-то сравнивает значения элементов массива с индексами... В итоге в лучшем случае ты получишь полностью отсортированный массив(это если убрать косяк со сравнением massive[i]>=c1 ).
Должно быть как-то так

//сформировали массив

for i:=1 to 20 do
massive[i]:=random(200);

//читаем индексы 1 и 2
writeln('vvedi c1= ');
readln(c1);
writeln('vvedi c2= ');
readln(c2);
//сортируем
for i:=c1 to c2 do
for j:=i+1 to c2 do
if (massiv[i]<massiv[j]) then
begin
b:=massiv[i];
massiv[i]:=massiv[j];
massiv[j]:=b;
end;

//выводим весь массив или только заданный интервал (допустим, второе)
for i:=c1 to c2 do
writeln(massiv[i]);

В итоге мы получим массив, начало и конец которого неотсортированы, а отсортированы только элементы с1-с2