Дано масив A[1..10] = {5; 1; 7; 4; -3; 8; 0; 6; 2; 3} Як зміниться зміст масиву під час першого проходу при сортуванні обміном (методом бульбашки).
А) 5; 1; 7; 4; -3; 3; 0; 6; 2; 8 Б) 1; 5; 4; -3; 7; 0; 6; 2; 3; 8 В) -3; 0; 1; 2; 3; 4; 5; 6; 7; 8 Г) 8; 1; 7; 4; -3; 5; 0; 6; 2; 3

Представление.

Объяснение:

   В данном случае не хватает сведений для того, чтобы с уверенностью ответить на данный вопрос. Можно с уверенностью сказать, что номер уже имеется на каком-то источнике информации, то есть это не "сбор". Также это не "хранение", так-как информация с одного носителя в конечном итоге перемещается на другой. Также это не является "передачей" информации в полном смысле этого словосочетания, так-как передача осуществляется без преобразования информации.

   Соответственно запись номера в телефонную книжку - представление информации из того, в каком виде эта информация поступила к записывающему в текст.  

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

1)
begin
  var a:=ArrRandom(ReadInteger('n='),20,79); a.Println;
  var x:=a.Where(t->t.IsEven).Count; 
  If x>0 then Println('Количество четных:',x) else Println('Четных нету');
  var y:=a.Where(t->t mod 10=6).Count; 
  If y>0 then Println('Количество оканч. на 6:',y) else Println('Оканч. на 6 нету');
end.

Пример:
n= 5
79 29 27 74 27
Количество четных: 1 
Оканч. на 6 нету 

2)
begin
  var a:=ArrRandom(10,0,100); a.Println;
  Println('Кол-во пар:',Range(0,8,2).Where(t->a[t]=a[t+1]).Count)
end.

Пример:
56 93 72 72 71 24 37 55 91 91
Кол-во пар: 2