const N = 10;
begin
var a := ArrRandom(N, 0, 20);
var b := ArrRandom(N, 0, 20);
var c := ArrRandom(N, 0, 20);
write('Массив a: '); a.Println();
write('Массив b: '); b.Println();
write('Массив c: '); c.Println();
write('Элементы, принадлежащие всем трем массивам: ');
a.FindAll(x->b.Contains(x) and c.Contains(x)).Distinct(
).PrintLn();
end.
Объяснение:
Первые три строки после begin создают три массива a,b,c и заполняют их N целыми числами в диапазоне от 0 до 20.
Конструкция "a.FindAll(x->b.Contains(x) and c.Contains(x)).Distinct().PrintLn();" делает следующее:
В массиве a выполняется поиск всех элементов (метод FindAll), удовлетворяющих условию:
x->b.Contains(x) and c.Contains(x)
Которое проверяет каждый элемент массива a (который обозначен x), содержится ли он в массиве b и массиве c (Методы Contains).
Далее метод Distinct удаляет все одинаковые элементы из получившейся последовательности, а метод PrintLn выводит результат на экран.
Что захочешь Об отмене крепостного права говорили с начала 19-го века и только в середине Александр II смог осуществить реформу. Миллионы российских крестьян получили свободу. Но как же проходила подготовка реформы? На каких условиях освобождались крестьяне? Так ли легко им стало жить в первые годы после отмены крепостничества?Было несколько причин отмены крепостного права: оно мешало экономическому развитию страны, грозило нарушением общественного спокойствия, образованная часть общества относилась к крепостничеству как к рабству, грозило для страны скатыванием в разряд второстепенных держав, увеличивалась военно-техническая отсталость России от европейских стран. Реформу готовили несколько лет, и в 1861 году Александр II издал Манифест. Крестьяне стали свободными, но должны были выкупать землю. Экономическое положение крестьян начинает ухудшаться из-за тяжёлых условий выкупа, в связи с этим начинаются бунты. Однако, реформа была нацелена на перспективу и ее результаты должны были сказаться через несколько лет. В стране начнут развиваться капиталистические отношения (наемный труд, увеличится количество фабрик и заводов), повысится урожайность зерновых культур. Но при этом в первое десятилетие проведения реформы ухудшилось экономическое положение крестьян.Какие факты свидетельствуют о наличии крепостной зависимости у крестьян Прибалтики2. Какие двигательные качества спортсмена необходимы для овладении техники прыжка в высоту с разбега любыми Приведите ро одному примеру из 6 качеств.
1 Какие бывают в прыжках в высоту с разбега?
1 Какие бывают в прыжках в высоту с разбега?
ЭТО ТО ЧТО АЩЧОШЕШЬ
Поделитесь своими знаниями, ответьте на вопрос:
Совокупность всех компьютерных программ 11 букв два слова