Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 02.02.2016
Сообщений: 10

Сформировать третий массив из элементов двух исходных

23.02.2016, 19:50. Показов 1854. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Произвольно заданы две одномерных массива.Сформировать третий массив, каждый элемент которого является максимальным элементом соответственно в каждом из двух исходных массивах.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
23.02.2016, 19:50
Ответы с готовыми решениями:

Сформировать третий массив из положительных элементов исходных массивов, меньших 10
Сформировать третий массив из положительных элементов исходных массивов, меньших 10.

Составить третий массив из положительных элементов двух исходных массивов, расположенных на чётных местах
вывести 2 массива целых чисел составить 3 ий массив из положительных элементов каждого массива расположенных на чётных местах. В паскале

Создать третий массив из двух исходных
Даны два массива. Образовать третий массив, в котором сначала будут расположены все положительные элементы первого массива, затем...

3
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
23.02.2016, 20:44
Лучший ответ Сообщение было отмечено eQvin как решение

Решение

Создаете 2 массива x,y размера n.
Третий массив.
Pascal
1
2
for i:=1 to n do
if x[i]>y[i] then z[i]:=x[i] else z[i]:=y[i];
1
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
24.02.2016, 09:54
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
begin
  Randomize;
  var n := ReadLnInteger('Размеры массивов: n =');
  var a := ArrRandom(n, 0, 99);
  var b := ArrRandom(n, 0, 99);
  var c := Arr(a);
  for var i := 0 to n-1 do c[i] := max(c[i], b[i]);
  WriteLn('a = ', a, NewLine, 'b = ', b, NewLine, 'c = ', c);
end.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33395 / 21505 / 8236
Регистрация: 22.10.2011
Сообщений: 36,901
Записей в блоге: 12
24.02.2016, 11:14
JuriiMW, 6-я и 7-я строки запросто меняются на
Pascal
1
var c := a.Zip(b, (x, y) -> Max(x, y)).ToArray;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
24.02.2016, 11:14
Помогаю со студенческими работами здесь

Создать новый массив из элементов двух исходных
дано два одинаковых массивы создать новый массив в котором сначала все элементы первого затем положительные элементы второго массива дальше...

Ввести два массива из 12 и 16 элементов, сформировать третий массив
Ввести два массива из 12 и 16 элементов, сформировать третий массив из элементов входящих одновременно в оба массива

Сформировать новый массив, состоящий из элементов, равных соответственно суммам исходных массивов
помогите пожалуйста решить задачу даны три массива VEC 1=(1.0; 3.9; -2.6) VEC 2= (-7; 4.6; -11; 13) VEC 3=(6.9; -3; 12.3; 6.2; 1) ...

Получить массив, каждый элемент которого равен сумме соответствующих элементов двух исходных
Дан массив A(10,12) и B(10,12) А)Получить массив C(10,12) каждый элемент которого равен сумме соответствующих элементов данных массивов. ...

Получить третий массив путем сложения соответствующих элементов первых двух
Задать два двумерных массива одного размера. Получить третий массив путем сложения соответствующих элементов первых двух. Если получаемый...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru