Ваня шифрует русские слова записывая вместо каждой буквы её номер в алфавите без пробелов номера букв даны в таблице 31212
12987
10926
36510
129
434
Ответы на вопрос:
Основная идея: во массиве p строим двусвязный список, элементы которого указывают на предка и потомка члена массива, имеющего такое же значение. сначала выводим элементы, имеющие потомков, но не имеющие предков - это будут элементы, которые встречаются более одного раза, а их порядок следования совпадет с порядком следования в массиве. затем выводим элементы, которые не имеют ни предков, ни потомков, т.е. встречаются в массиве один раз. const n = 100; var a: array[1..n] of integer; p: array[1..n, 1..2] of integer; {3 - индекс предыдущего элемента 4 - индекс следующего элемента} i, j, e: integer; begin randomize; for i : = 1 to n do begin e : = random(51) - 25; a[i] : = e; p[i, 1] : = 0; p[i, 2] : = 0 end; for i : = 2 to n do begin j : = i - 1; e : = a[i]; repeat if e = a[j] then begin p[j, 1] : = i; p[i, 2] : = j; j : = 0 end else j : = j - 1 until j = 0 end; for i : = 1 to n do if (p[i, 1] > 0) and (p[i, 2] = 0) then write(a[i]: 4); for i : = 1 to n do if (p[i, 1] = 0) and (p[i, 2] = 0) then write(a[i]: 4); writeln end. тестовое решение: -15 -21 -4 24 20 16 4 14 3 1 25 -9 -14 10 12 -13 9 -2 -16 -10 -25 21 2 8 15 -1 19 22 18 -23 6 -6 -17 -24 17 -20 -7 -12 -19 -3 7 23
Популярно: Информатика
-
ravng25820.11.2021 16:54
-
bryazgin98p06isp01.09.2021 00:58
-
lada4815.10.2020 10:27
-
voytyukk29.03.2022 11:25
-
David346410.12.2020 07:20
-
Theknopa44418.10.2021 02:37
-
aalenka47111.05.2022 18:54
-
begimot8113.06.2023 17:18
-
scorp200302.12.2022 04:51
-
irazatula0504.09.2020 12:45