Массив

@Vigoss · Регистрация: 13.11.2011

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

Упорядочить элементы массива y из 10 элементов расположив их по убыванию.

@Posik · 02.12.2011, 07:52

Pascal

program ffff;
uses crt;
const n =10;
var a:array[1..n] of integer;
BEGIN
for i:=1 to n do
 a:=random(100);
 
for i:=1 to n do
  for j:=1 to n-i do
     if a[j]>a[j+1] then
     begin
          temp:=a[j];
          a[j]:=a[j+1];
          a[j+1]=temp;
     end;
 
for i:=1 to n do
 write(a[i]);
END.

@mamedovvms · 02.12.2011, 07:54

Posik, только забыли объявить переменные счетчика и промежуточную переменную

@juvmax · 02.12.2011, 08:04

Это обычная сортировка! Погуглите, методы сортировки! Или поищите по форуму!

@Vigoss 0 / 0 / 0 Регистрация: 13.11.2011 Сообщений: 9
		1
	Массив 02.12.2011, 07:35. Показов 359. Ответов 3 Метки нет (Все метки) Упорядочить элементы массива y из 10 элементов расположив их по убыванию. 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	02.12.2011, 07:54	3
	Posik, только забыли объявить переменные счетчика и промежуточную переменную 0

@juvmax 29 / 29 / 23 Регистрация: 04.11.2011 Сообщений: 65
	02.12.2011, 08:04	4
	Это обычная сортировка! Погуглите, методы сортировки! Или поищите по форуму! 0