Есть ответ 👍

Напишите программу в которой для массива из 10 элементов, заполненного случайными числами в диапазоне от 0 до +100, слева направо по порядку сравниваются соседние элементы и, если первый элемент в паре оказался больше второго, элементы меняются местами. в конце массив выводится в строку.

271
382
Посмотреть ответы 2

Ответы на вопрос:

adamabiev
4,7(29 оценок)

ответ: up: avto.подбор

объяснение:


const n=20; m=10;

var  

a:array[1..n] of integer;

k:array[0..m-1] of integer;

i,j,max:integer;

begin

writeln('Исходный массив:');

for i:=1 to n do

begin

a[i]:=random(m);

write(a[i],'  ');

end;

writeln;

for j:=0 to m-1 do k[j]:=0;

for i:=1 to n do k[a[i]]:=k[a[i]]+1;

max:=0;

for j:=1 to m-1 do

 if k[j]>k[max] then max:=j;

writeln('Самый часто встречающийся элемент: ',max);

writeln('Встречается в массиве ',k[max],' раз(а)');

end.

Объяснение:Пример:

Исходный массив:

1  1  8  8  6  2  3  8  8  9  5  2  6  9  8  7  3  9  7  9  

Самый часто встречающийся элемент 8

Встречается в массиве 5 раз(а)

Популярно: Информатика