Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
КристинаВощевоз555
05.10.2022 19:50 •
Информатика
Дан массив. выведите его элементы, которые встречаются в массиве только один раз
Показать ответ
Ответ:
linaangel20012
01.10.2020 17:32
Var
a: array [1..10] of integer;
i,b : integer;
begin
randomize;
writeln('b=');
readln(b);
for i:=1 to 10 do
a[i]:=Random(10);
for i:=1 to 10 do
if A[i]= b then
writeln('есть',A[i])
else
writeln('нет такого ')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
dniil2003
04.09.2020 00:19
Сколько цветов в цветовом режиме CMYK?...
lelchist
18.06.2021 06:46
2. Запишите 32-битовый IP-адрес 11101010.11010101.01100111.01010101 в виде четырех десятичных чисел, разделенных точками....
Арина200911
22.06.2022 11:05
Создать алгоритм и программу нахождения значения функции: f = 2у + √ y + 4 если у= е^sinx +cos x для серии значений х=3,9; х= 5. кто умеет это делать...
daxandra
15.03.2023 09:30
Расшифруйте шифрограмму методом гаммирования Шифрограмма: оузсмълуомвзжйс Гамма: 32 33 35 34...
mariakyzminova
12.06.2021 12:53
Записать арифметическое выражение на алгоритмическом языке(PYTHON ) и указать порядок выполнения операций....
yarmen021
06.05.2021 21:24
011. Восстановить цифры, на месте которых стоят звездочки (числа записаны в системе счисления с основанием 2:1*1*01, + 1*0*12= 1*O000*2....
Klimg
04.03.2022 04:04
Устройство , состоящее из 6 независимо работающих элементов , включается за время т. вероятность отказа из них за это время равна 0,3. найти вероятность того , что откажут три элемента....
marinka0810
26.03.2021 08:50
1шарикипетя вспомнил окоробке с цветными шариками и стал придумывать игру. все шарикивыставил в линию. и стал рассматривать шарики слева направо. когда обнаруживал непрерывнуюцепочку...
vysocskij1961
09.05.2020 00:33
Назовите наибольшее число, в двоичной записи которого всего восемь значащих цифр, из которых ровно две единицы....
oleksiikrasuyk
02.09.2021 22:18
Для узла с ip-адресом 192.168.104.15 адрес сети равен 192.168.104.0. найдите наибольшее возможное количество нулей в двоичной записи маски подсети....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a: array [1..10] of integer;
i,b : integer;
begin
randomize;
writeln('b=');
readln(b);
for i:=1 to 10 do
a[i]:=Random(10);
for i:=1 to 10 do
if A[i]= b then
writeln('есть',A[i])
else
writeln('нет такого ')
end.