Составить программу для сортировки массива методом «пузырька»

@Ирина Шулданова · Регистрация: 28.02.2012

Author24 — интернет-сервис помощи студентам

Составить программу для сортировки методом «пузырька» массива Z(12) по возрастанию и массива В(10) методом сплошного просмотра по убыванию его элементов.

@aleksskay · 28.02.2012, 16:51

Pascal

uses crt;
 var z:array[1..12] of integer;
  m,i,r:integer;
   begin
 clrscr;
writeln('введите элементы '); 
for i:=1 to 12 do
   readln(z[i]);
   for   m:=12 downto 2 do begin
 for  i:=1 to m-1 do  begin
  if z[i]>z[i+1] then
 begin
 r:=z[i];
 z[i]:=z[i+1] ;
 z[i+1]:=r;
end;
end;
end;
   writeln('сортированный массив ');  
   for i:=1 to 12 do 
 write(z[i]:4);
readln;
end.

пузырек

@Ирина Шулданова 0 / 0 / 1 Регистрация: 28.02.2012 Сообщений: 20
		1
	Составить программу для сортировки массива методом «пузырька» 28.02.2012, 14:29. Показов 1279. Ответов 1 Метки нет (Все метки) Составить программу для сортировки методом «пузырька» массива Z(12) по возрастанию и массива В(10) методом сплошного просмотра по убыванию его элементов. 0

	28.02.2012, 16:51

Опции темы

Составить программу для сортировки массива методом «пузырька»

Решение