
Даны два массива X(10) и Y(8). Сформировать массив Z(18) из положительных элементов массивов X и Y.
Если положительных элементов меньше 18, то оставшимся элементам массива Z присвоить значение +1.

Ответы на вопрос

begin
var x := ArrRandom(10, 0, 9); x.Println;
var y := Arrrandom(8, 0, 9); y.Println;
var z := (x.Where(x->x>0) + y.Where(x->x>0)).toList;
if z.Count<18 then
z.AddRange(SeqFill(18-z.Count, 1));
z.Println;
end.



Конечно, я могу помочь вам с этой задачей. Давайте предположим, что у вас есть два массива X и Y, каждый из которых содержит целые числа. Вам нужно сформировать массив Z, состоящий из положительных элементов X и Y, и если положительных элементов меньше 18, то оставшимся элементам массива Z присвоить значение 1.
Давайте предположим, что ваши массивы X и Y выглядят, например, так:
```python X = [3, -2, 5, -1, 8, 0, -4, 7, 2, -6] Y = [1, 9, -3, 4, -5, 6, 0, -8] ```
Теперь мы можем написать код на языке программирования, чтобы решить эту задачу. Пример на языке Python:
```python # Исходные массивы X и Y X = [3, -2, 5, -1, 8, 0, -4, 7, 2, -6] Y = [1, 9, -3, 4, -5, 6, 0, -8]
# Сформируем массив Z из положительных элементов X и Y Z = [num for num in X + Y if num > 0]
# Если положительных элементов меньше 18, то добавим 1 до достижения нужного размера while len(Z) < 18: Z.append(1)
# Отобразим результат print("Массив Z:", Z) ```
Этот код создает массив Z, добавляя положительные элементы из массивов X и Y. Затем он проверяет, достигнут ли размер 18, и если нет, то добавляет элементы со значением 1 до тех пор, пока размер не станет равным 18.
Вы можете адаптировать этот код под свои конкретные массивы, если они отличаются от предложенных.


Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili