Предмет: Информатика,
автор: 6efam5
Даны два массива X(10) и Y(8). Сформировать массив Z(18) из положительных элементов массивов X и Y. Если положительных элементов меньше 18, то оставшимся элементам массива Z присвоить значение +1.
Ответы
Автор ответа:
0
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.
Похожие вопросы
Предмет: Английский язык,
автор: agelkrillova
Предмет: Русский язык,
автор: sofiakraeva
Предмет: Литература,
автор: temka00979
Предмет: Алгебра,
автор: sonyagorbik5551
Предмет: Геометрия,
автор: sahamixotin2001