N3 составь цепочки а- из одной жёлтой треугольной бусины; б- из двух зелёных бусин квадратной и круглой формы в- из жёлтой квадратной и синей треугольной бусин; г- из красной квадратной и жёлтой треугольной бусин; д- из одной синей квадратной бусины. склей цепочки: а + б + -> д + г + д +д

1 красная, 2 зеленая, 3 красная, 4 желтая, 5 желтая, 6 синяя, 7 синяя

мне кажется что это Pascal

Объяснение:

Ключевые особенности PascalABC.NET

Ряд расширений языка Pascal, в числе которых оператор foreach, внутриблочные описания переменных, автоопределение типа при описании, встроенные множества произвольных типов, case по строкам, упрощенный синтаксис модулей, методы в записях, операция new для создания объектов, определение тел методов внутри классов, целые произвольной длины, многомерные динамические массивы.

Самые современные средства языков программирования: обобщенные классы и подпрограммы, интерфейсы, перегрузка операций, λ-выражения, исключения, сборка мусора, методы расширения, безымянные классы, автоклассы.

Генерация эффективного кода для платформы .NET.

Высокая совместимость с Delphi.

Высокая скорость выполнения программ.

Возможность доступа к огромному количеству .NET-библиотек от контейнерных классов до средств работы с сетью.

Среда разработки с встроенным отладчиком, обеспечивающая подсказки по коду, переход к определению и реализации подпрограммы, шаблоны кода, автоформатирование кода.

Встроенный в среду разработки дизайнер форм для быстрого создания оконных приложений.

Простые и эффективные графические библиотеки (растровая, векторная и трёхмерная) для создания простых визуализаций и анимаций.

Средства параллельного программирования в виде директив OpenMP.

Встроенный электронный задачник Programming Taskbook.

Модули исполнителей Робот и Чертежник, используемых в школьной информатике.

Механизм проверяемых заданий, обеспечивающий автоматическую постановку и проверку заданий.

Возможность запуска консольного компилятора под Mono в современных версиях Linux, возможность встраивания PascalABC.NET в редактор Geany.

Система PascalABC.NET является совместной разработкой российских и немецких программистов. В России центр разработки находится в институте математики, механики и компьютерных наук Южного федерального университета.

PascalABC.NET активно используется в ряде средних и высших учебных заведений России и ближнего зарубежья. Так, на мехмате Южного федерального университета он используется для обучения 1 курса направления Фундаментальная информатика и информационные технологии в курсе Основы программирования, а также для обучения школьников в одной из самых больших в России Детской компьютерной школе.

n = int(input('Введите количество элементов массива: '))

a = [int(input("Введите элемент массива: ")) for i in range(n)]

k = int(input("Введите любое число: "))

m = 0

for i in a:

   if i == k:

       m = m + 1

if m == 0:

   print ("NO")

else:

   print ("YES")

Объяснение:

Я немного подправила программу по синтаксису(были ошибки). А ещё не поняла, что нужно сделать, но вот два теста:

ТЕСТ 1:

ВВОД:

Введите количество элементов массива: 2

Введите элемент массива: 2

Введите элемент массива: 2

Введите любое число: 12

ВЫВОД ПРОГРАММЫ:

NO

ТЕСТ 2:

ВВОД:

Введите количество элементов массива: 2

Введите элемент массива: 12

Введите элемент массива: 12

Введите любое число: 12

ВЫВОД ПРОГРАММЫ:

YES