Ввести массив а[1..10]. отсортировать по убыванию элементы массива а любым методом. вывести на экран в два столбца, стоящих рядом, исходный и отсортированный массивы, элементы вывести через точку с запятой.

svetik040201p01o4x svetik040201p01o4x    1   09.07.2019 07:40    0

Ответы
Sashenka585888 Sashenka585888  16.09.2020 22:56
Var b,a: array[1..10] of integer; I,j: integer; Begin For i:=1 to 10 do read(a[i]); B:=a; For j:=9 downto 1 do For i:=1 to j do If (b[i]
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика