Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
 Аватар для Futilite
8 / 8 / 1
Регистрация: 17.12.2009
Сообщений: 85

Задано два массива чисел. Определите, сколько цифр содержится в обоих массивах

15.01.2014, 23:16. Показов 1519. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
3. Задано два массива чисел. Определите, сколько цифр содержится в обоих массивах
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.01.2014, 23:16
Ответы с готовыми решениями:

Задано два натуральных числа: m и n. Определить, сколько цифр содержится в десятичной записи числа m^n.

Определить, сколько всего одинаковых цифр содержится в двух данных массивах (КР580)
Здравствуйте, подскажите, пожалуйста, у меня проблемы с реализацией следующего : Есть два массива по 8 однобайтовых шестнадцатеричных...

Отсортировать два одномерных массива пузырьком и найти элементы, присутствующие в обоих массивах
Доброго времени суток. И так задача такова: отсортировать два одномерных массива (пузырьком) и найти элементы присутствующие в обоих...

1
 Аватар для APALoff
1648 / 1077 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
16.01.2014, 11:34
Лучший ответ Сообщение было отмечено Futilite как решение

Решение

Надо угадать? Это игра такая?

Добавлено через 54 минуты
Я открыл свой третий глаз и угадал полные условия задачи!
Вот решение:
Pascal
1
2
3
4
5
6
7
8
9
Const
  N1 = 10;
  N2 = 20;
Var 
  M1 : array[1..N1] of Integer;
  M2 : array[1..N2] of Integer;
Begin
  Writeln('Всего чисел в двух массивах: ',N1+N2);
End.
А вообще, самый правильный ответ - 42 !!!

Добавлено через 12 минут
Или действительно надо ВСЕ цифры в числах посчитать?

Добавлено через 3 минуты
Тогда, используя В записи натурального числа N поменять местами крайние цифры
Будет так:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Const
  N1 = 10;
  N2 = 20;
Var 
  M1 : array[1..N1] of Integer;
  M2 : array[1..N2] of Integer;
  i : Byte;
  N : Longint;
Begin
  N:=0;
  For i:=1 to N1 do N:=N+GetNumCifr(M1[i]);
  For i:=1 to N2 do N:=N+GetNumCifr(M2[i]);
  Writeln('Всего цифр в числах из двух массивов: ',N);
End.
Добавлено через 1 минуту
Но все будет еще веселее, если надо будет найти количество различных цифр в числах из двух массивов...
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.01.2014, 11:34
Помогаю со студенческими работами здесь

Найти последовательность максимальной длины, которая содержится в обоих массивах
Подскажите алгоритм решения задачи, а программу напишу я уже сам. Задача: Даны два массива. Напишите программу, которая находит такую...

Определите, сколько различных чисел содержится в одномерном массиве
Определите, сколько различных чисел содержится в одномерном массиве.

Определите, сколько различных чисел содержится в одномерном массиве
Определите, сколько различных чисел содержится в одномерном массиве.

Определите, сколько цифр совпадают у заданных чисел
Даны два целых трёхзначных числа. Определите, сколько цифр у них совпадают. Программа должна вывести одно из чисел: 3 (если все цифры...

Ввести два двузначных числа. Вывести цифру (цифры), если они содержится в обоих числах
2)Ввести два двузначных числа. Вывести цифру (цифры), если они содержится в обоих числах


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru