C++. упорядочить массив размера 8 по убыванию и вывести элементы с порядковыми номерами 2 и 3, найти разность между этими элементами.

isakoksanka isakoksanka    3   04.10.2019 08:50    1

Ответы
DanilGrushin1 DanilGrushin1  09.10.2020 19:15

var  

v:array[1..100] of integer;  

i,j,n,b:integer;  

begin  

randomize;  

write('vvedite razmernost'' massiva: '); readln(n);  

writeln(' Ishodnii massiv '); writeln;  

//Заполним массив случайными числами  

for i := 1 to n do  

begin  

v[ i]:=random(100)-50;  

write(v[ i]:4);  

end;  

writeln;  

 

// организуем сортироваку от минимального  

// к максимальному элементу массива  

for i:=1 to n-1 do  

for j:=i+1 to n do  

if v[ i]>v[ j] then  

begin  

b:=v[ i];  

v[ i]:=v[ j];  

v[ j]:=b;  

end;  

writeln;  

write(' Otsortirovannii massiv ');writeln;writeln;  

write('ot min k max: ');writeln;  

for i := 1 to n do  

write(v[ i]:4); writeln; writeln;  

write('ot max k min: '); writeln;  

for i := n downto 1 do  

write(v[ i]:4);  

readln;  

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика