Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 1
Регистрация: 28.02.2017
Сообщений: 9

Найти наименьшее среди тех элементов массива a1,…,an, которые не являются элементами массива b1,…,bn

28.02.2017, 18:40. Показов 1019. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый вечер!
Пытаюсь решить эту задачу:Найти наименьшее среди тех элементов массива a1,…,an, которые не являются элементами массива b1,…,bn.
На данный момент программа находит минимальное значение среди элементов первого массива. Но не знаю,как указать, что бы учитывалось то, есть ли одинаковые элементы среди первого и второго массива.
Вот что имею на данный момент:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
type mass=array[1..100] of integer;
var a1,a2:mass;
var n1,n2,k1:integer;
 
procedure input(var a:mass;n:integer);
var i:integer;
begin
for i:=1 to n do
a[i]:=random(100);
end;
 
procedure print(a:mass;n:integer);
var i:integer;
begin
write('Элементы массива: ');
for i:=1 to n do
write(a[i]:4);
writeln;
end;
 
 
procedure min(var a:mass;n:integer; var k:integer);
var i,ma:integer;
begin
ma:=a[1];
k:=0;
begin
for i:=2 to n do
begin
if (a[i]<ma) then
ma:=a[i];
k:=i;
end;
writeln(ma);
end;
end;
 
 
 
 
 
 
begin
write('Введите количество элементов массива: ');
readln(n1);
input(a1,n1);
print(a1,n1);
writeln('Введите количество элементов второго массива');
readln(n2);
input(a2,n2);
print(a2,n2);
writeln('Минимальный элемент первого массива');
min(a1,n1,k1);
end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
28.02.2017, 18:40
Ответы с готовыми решениями:

Найти и вывести среди элементов массива те, которые являются четными и кратными 7
Дан одномерный целочисленный массив А из 10 элементов. Найти и вывести среди них те, которые являются четными и кратными 7

Найти максимальный среди тех элементов массива, которые стоят на нечетных местах
Помогите решить 2. Дан одномерный массив, который содержит не более 40 целых положительных и отрицательных чисел. Найти максимальный...

Сформировать вектор В, элементами которого являются значения элементов тех строк исходного массива, сумма которых положительна
1.Дана матрица C(M,N). Сформировать вектор В, элементами которого являются значения элементов тех строк исходного массива, сумма которых...

3
 Аватар для Hitoku
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
01.03.2017, 21:17
Можно сделать ещё один массив (грубо говоря C), который будет состоять из элементов, которые не входят в B. А потом в нём уже искать минимальный
1
0 / 0 / 1
Регистрация: 28.02.2017
Сообщений: 9
02.03.2017, 18:53  [ТС]
Хорошо,попробую сделать так,спасибо
0
Модератор
Эксперт по электронике
 Аватар для ФедосеевПавел
8662 / 4498 / 1670
Регистрация: 01.02.2015
Сообщений: 13,915
Записей в блоге: 12
02.03.2017, 20:10
Можно отсортировать массивы и просматривая элементы массива a искать их в b. И первый элемент a[i], которого нет в b - и есть ответ.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
02.03.2017, 20:10
Помогаю со студенческими работами здесь

Найти максимум среди элементов первой половины массива и минимум среди второй половины массива, которые поменять местами
Люди... Как составить прогу для PascalABC? Не могу разбить массив на две половины... Ввести одномерный массив , вывести его. Найти...

Найти среди элементы массива, которые являются квадратами некоторого числа т.
Даны целые положительные числа а1, а2,..., аn. Найти среди них те, которые являются квадратами некоторого числа т.

Вывести среднее арифметическое простых чисел среди элементов массива, которые являются делителями числа 360
Вводятся размер одномерного массива и его элементы. Вывести среднее арифметическое простых чисел среди элементов массива, которые являются...

Дан одномерный массив A[10]. Элементами массива являются случайные числа от -10 до 10. Подсчитайте количество положительных элементов данного массива
Помогите пожалуйста :cry:

Найти наименьшее значение и его номер среди элементов массива x, стоящих на четных местах
Дано:массив X(14).найти наименьшее значение и его номер среди элементов массива x,стоящих на четных местах,а так же наименьшее значение и...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru