Предмет: Информатика,
автор: 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.
Интересные вопросы
Предмет: Другие предметы,
автор: versachexdior
Предмет: Информатика,
автор: jackxiebs
Предмет: Қазақ тiлi,
автор: zkusainova885
Предмет: Математика,
автор: Karpushkina78
Предмет: Математика,
автор: Аноним