Pascal ABCНапишите программу, которая сортирует массив и выводит все элементы массива,

Pascal ABC

Напишите программку, которая сортирует массив и выводит все элементы массива, которые встречаются ровно K раз.

Входные данные
1-ая строчка содержит размер массива N . Во 2-ой строке через пробел задаются N чисел элементы массива. Гарантируется, что 0 lt; N 10000 . В третьей строке записано натуральное число K .

Выходные данные
Программка должна вывести все элементы массива, которые встречаются ровно K раз, в порядке возрастания, разделив их пробелами. Если таких частей нет, программка обязана вывести число 0.

Образцы
входные данные
6
1 2 1 2 1 3
2
выходные данные
2

Задать свой вопрос
1 ответ
Var begin c:=0; Read(n); Read(k); For i:=1 to n do read(a[i]); For i:=1 to n-1 do For j:=n-1 downto i do If a[j]gt;a[j+1] then begin C:= A[j]; a[j]:=a[j+1]; A[j+1]:=c; End; For i:=1 to n do begin For j:=I to n do If a[i]=a[j] then c:=c+1; If c=k then write(a[i], ); c:=0; End; End.
Инна Засадько
С телефона пишу, но порога обязана работать
Тимур
Прога*
Ольга Алевич
Надобно через массив и вложенный цикл
Мерзлютина Элина
В новый массив числа записать?
Николай Томилин
Дописал прогу спасибо за код
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт